Annotation of 43BSD/contrib/news/src/rmgroup.sh, revision 1.1.1.1

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

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.