bugafriend/scripts/say.in

#!@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))))