ref: fb896e265c63518d3202d2d24112d4ac28b28b24
dir: /lib/gone.fishing/
#!/bin/rc
# gone.fishing local!$user /mail/box/$user/mbox - vacation responder
# as pipeto script
# standard library. saves the message on standard input in $TMP.msg and
# parses it into /mail/fs/mbox/1.
. /mail/lib/pipeto.lib $*
{cat $TMP.msg; echo} >>/mail/box/$USER/gone.mail
message=/mail/box/$USER/gone.msg
if (! test -e $message)
message=/mail/lib/gone.msg
MAILTO=`{cat $D/replyto}
grep '^'$"MAILTO'$' /mail/box/$USER/gone.addrs >/dev/null >[2=1] || {
echo $MAILTO >>/mail/box/$USER/gone.addrs
mail $MAILTO <$message
}