|
|
1.1 ! root 1: : '@(#)rmgroup.sh 1.4 12/27/84' ! 2: for group ! 3: do ! 4: echo "Removing newsgroup $group" ! 5: qgrp="`echo $group | sed 's/\./\\\./g'`" ! 6: if ! 7: grep -s "^$qgrp " LIBDIR/active ! 8: then ! 9: cat << E_O_F >/tmp/$$ ! 10: /^$qgrp[ ]/d ! 11: w ! 12: q ! 13: E_O_F ! 14: ed - LIBDIR/active < /tmp/$$ ! 15: ed - LIBDIR/newsgroups < /tmp/$$ ! 16: dir=SPOOLDIR/"`echo $group | sed 's/\./\//g'`" ! 17: if ! 18: [ -d "$dir" ] ! 19: then ! 20: rm -r "$dir" ! 21: else ! 22: echo "$0: $dir: no spool directory" 2>&1 ! 23: fi ! 24: else ! 25: echo "$0: $group: no such newsgroup" 2>&1 ! 26: fi ! 27: done ! 28: rm -f /tmp/$$ ! 29: exit 0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.