|
|
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.