home *** CD-ROM | disk | FTP | other *** search
- #! /bin/csh -f
- # Learn an incorrect spelling of a word or words. (Spellings which
- # might be generated from general spelling rules. See man-page for 'spell'.)
- #
- # Creates and maintains files
- # ~/lib/stop ... sorted text of words to suppliment standard stop-list
- # ~/lib/hstop ... supplimental and standard lists, merged and hashed
- # ~/lib/stop.temp ... scratch file
- # ~/lib/hstop.temp ... scratch file
- #
- # I don't know why I need to make a copy of /usr/dict/hstop, but
- # that's the only way I found to make it work. .. djones
-
- # See also learn_word
-
- echo $* | tr ' ' '\012' >> ~/lib/stop
- sort -u ~/lib/stop > ~/lib/stop.temp
- mv ~/lib/stop.temp ~/lib/stop
- cp /usr/dict/hstop ~/lib/hstop.temp
- /usr/bin/spellin ~/lib/hstop.temp < ~/lib/stop > ~/lib/hstop
- rm ~/lib/hstop.temp
-