Return to suggest.sh CVS log

Up to [CSRG BSD Unix] / 43BSD / usr.bin / diction

Annotation of 43BSD/usr.bin/diction/suggest.sh, revision 1.1.1.1

1.1       root        1: #! /bin/sh
                      2: #
                      3: #      @(#)suggest.sh  4.4     (Berkeley)      82/11/06
                      4: #
                      5: trap 'rm $$; exit' 1 2 3 15
                      6: D=/usr/lib/explain.d
                      7: while echo "phrase?";read x
                      8: do
                      9: cat >$$ <<dn
                     10: /$x.*  /s/\(.*\)       \(.*\)/use "\2" for "\1"/p
                     11: dn
                     12: case $x in
                     13: [a-z]*)
                     14: sed -n -f $$ $D; rm $$;;
                     15: *) rm $$;;
                     16: esac
                     17: done

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