Return to postnews.v7 CVS log

Up to [Research Unix] / researchv10no / cmd / netnews / config

Annotation of researchv10no/cmd/netnews/config/postnews.v7, revision 1.1.1.1

1.1       root        1: : '@(#)postnews.v7     2.6     3/3/83'
                      2: if test $# -gt 1 ; then
                      3:        echo "$0: Too many args"
                      4:        exit 1
                      5: fi
                      6: if test $# -eq 1 -a ! -r "$1" ; then
                      7:        echo "$0: Can't read $1"
                      8:        exit 1
                      9: fi
                     10: echo -n "Subject: "
                     11: read title
                     12: echo -n "Newsgroups (general): "
                     13: read ng
                     14: if test x$ng = x ; then
                     15:        ng=general
                     16: fi
                     17: case $# in
                     18: 0)
                     19:        t=/tmp/pn$$
                     20:        trap "sleep 1; cp $t $HOME/dead.article ; echo saved in $HOME/dead.article ; rm -f $t; exit" 1 2
                     21:        echo "Subject: $title" > $t
                     22:        echo "Newsgroups: $ng" >> $t
                     23:        echo "" >> $t
                     24:        ${EDITOR-vi} $t
                     25:        if inews -h <$t
                     26:        then
                     27:                :
                     28:        else
                     29:                if cat $t >>$HOME/dead.article
                     30:                then
                     31:                        echo Article saved in $HOME/dead.article
                     32:                fi
                     33:        fi
                     34:        ;;
                     35: 1)
                     36:        inews -t "$title" -n $ng < $1
                     37:        ;;
                     38: esac
                     39: sleep 1
                     40: rm -f $t

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