#!/bin/rc
text=''
if (~ $1 -i) {
text=`{sed 1q}
shift
}
machine=$1
shift
if (~ $text '')
text=$"*
#
# This processing should be done according to a $home/lib/words
# file or something, to state which things (eg, rm) are pronounced
# in which ways (eg. delete).
# Probably, each new application should install its own set of
# translations.
if (test -x /bin/spellwords)
text=`{echo $text | spellwords}
{ echo '(SayText "'^$"text^'")' } | ssh $machine festival
exit ''
|