forked from vv/bugafriend
12 lines
237 B
Plaintext
12 lines
237 B
Plaintext
|
#!/home/vv/.guix-profile/bin/guile --no-auto-compile
|
||
|
|
-*- scheme -*-
|
||
|
|
!#
|
||
|
|
|
||
|
|
(use-modules
|
||
|
|
(goblins)
|
||
|
|
(goblins ocapn ids)
|
||
|
|
(bugafriend ui))
|
||
|
|
|
||
|
|
(with-vat (spawn-vat #:name "Speaker UI")
|
||
|
|
(say (string->ocapn-id (list-ref (command-line) 1))))
|