Return to sscan CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / mh / miscellany / mtrenv / bin

Annotation of 43BSD/contrib/mh/miscellany/mtrenv/bin/sscan, revision 1.1

1.1     ! root        1: : run this script through /bin/sh
        !             2: 
        !             3: if mhpath all > /dev/null; then true; else exit 1; fi
        !             4: 
        !             5: if [ "x$1" = x ]; then
        !             6:     S=`scan -format %subject first`
        !             7:     if [ "x$S" = x ]; then mark -add -zero -sequence select first; fi
        !             8: else
        !             9:     S="$1"
        !            10: fi
        !            11: 
        !            12: if [ "x$2" != x ]; then echo 'usage: sscan [subject]' 1>&2; exit 1; fi
        !            13: 
        !            14: if [ "x$S" != x ]; then
        !            15:     S=`echo $S | tr A-Z a-z | sed -e 's%^re:%%' | sed -e 's%^[         ]*%%'` 
        !            16:     if pick -subject "$S" -zero -sequence select; then true; else exit 1; fi
        !            17: fi
        !            18: 
        !            19: sortm select; scan select
        !            20: 
        !            21: exit 0

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