missing proto and more dummys

2 files changed, 25 insertions, 0 deletions

diff --git a/mail/lib/gone.fishing b/mail/lib/gone.fishing
new file mode 100644
index 000000000..66fb10bcf
--- /dev/null
+++ b/mail/lib/gone.fishing
@@ -0,0 +1,19 @@
+#!/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
+}
diff --git a/mail/lib/gone.msg b/mail/lib/gone.msg
new file mode 100644
index 000000000..ac1e7bd9e
--- /dev/null
+++ b/mail/lib/gone.msg
@@ -0,0 +1,6 @@
+subject: away from my computer
+
+This is a recorded message.  I am currently out of contact with my
+computer system.  Your message to me has been saved and will be
+read upon my return.  This is the last time you will receive this
+message during my absence.  Thank you.