+++ /dev/null
-#! /bin/bash
-
-# Killfile a luser in some newsgroup, optionally specifying a time to
-# give the luser a chance of a reprieve.
-
-# First parameter is the luser to killfile.
-# Second parameter is the newsgroup in which to killfile said luser.
-# Third and further parameters, if present, specify a time at which to
-# mail a message offering the luser a reprieve. Example time
-# specifications are "now + 1 week" and "8pm Nov 6"; see at(1) for
-# more details.
-
-exec 1>&2 # Everything goes to standard error
-
-if [ "X$1" == "X" -o "X$2" == "X" ]; then
- echo "Usage: $0 victim newsgroup [ time-spec ]"
- exit 1
-fi
-
-VICTIM=$1
-NEWSGROUP=$2
-KILLFILE="$HOME/News/`echo $NEWSGROUP | tr . /`/KILL"
-
-if [ ! -f $KILLFILE ]; then
- echo "Killfile for $NEWSGROUP not found"
- exit 1
-fi
-
-echo "/$VICTIM/f:j" >> $KILLFILE
-
-shift 2
-
-if [ "X$1" != "X" ]; then
- echo "$HOME/bin/reprieve \"$VICTIM\" $NEWSGROUP \"`date`\"" | /usr/bin/at "$*" 2>/dev/null
-fi
+++ /dev/null
-#! /bin/bash
-
-# Give a luser a chance at a reprieve from a killfiling by mailing
-# the current user.
-
-exec 1>&2 # Everything goes to standard error
-
-if [ "X$1" == "X" -o "X$2" == "X" -o "X$3" == "X" ]; then
- echo "Usage: $0 victim newsgroup killfile-date"
- exit 1
-fi
-
-/usr/lib/sendmail $LOGNAME <<-ENDMAIL
- From: The Rivan Court of Appeal <${LOGNAME}@riva.ucam.org>
- Subject: $1 is eligible for a reprieve
-
- A certain luser, $1, has been killfiled in the newsgroup
- $2 since $3.
-
- You elected to give this luser a chance at a reprieve. Please
- consider your verdict carefully, and run
-
- delkill "$1" $2
-
- if you consider that he or she still deserves another chance.
-
- Thank you,
-
- --
- The Rivan Court of Appeal
-ENDMAIL
-