|
|
researchv9-SUN3(old)
�spell run spell on the buffer version 4.7, warren montgomery 1in-case we have 2 <spell F�&<|fgrep -v -x -f $HOME/.dict �&�B<.exec �-remove trailing newline � create empty line on top to prime loop 2�prime text window ^�while more spell words �!��<SPELL? ���exit by moving to end of spell list � \<\>pick up word �>make 2 copies �go to top of text ^���while more occurances |���if the user just exits, do nothing � ���if the user exits with 0, make the next search fail �>�-�remove search word next-case, put in dictionary �dB<... push word, current buffer, ... % put word in new buffer -<$HOME/.dict push dictionary file B%write, and prepare to return ��n-��?B<... help, save buffer name <~EMACS/macros/spell_help ��<Continue? help done, now go back B%� note extra back compensates for forward at end of loop ����anything else, just beep �1return to 1 window mode
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.