|
|
1.1 ! root 1: �spell run spell on the buffer ! 2: version 4.7, warren montgomery ! 3: 1in-case we have 2 ! 4: <spell ! 5: F�&<|fgrep -v -x -f $HOME/.dict ! 6: �&�B<.exec ! 7: �-remove trailing newline ! 8: � ! 9: create empty line on top to prime loop ! 10: 2�prime text window ! 11: ^�while more spell words ! 12: �!��<SPELL? ! 13: ���exit by moving to end of spell list ! 14: � \<\>&pick up word ! 15: �>make 2 copies ! 16: �go to top of text ! 17: ^���while more occurances ! 18: |���if the user just exits, do nothing ! 19: � ���if the user exits with 0, make the next search fail ! 20: �>�-�remove search word ! 21: next-case, put in dictionary ! 22: �dB<... ! 23: push word, current buffer, ... ! 24: % ! 25: put word in new buffer ! 26: -<$HOME/.dict ! 27: push dictionary file ! 28: B%write, and prepare to return ! 29: ��n-��?B<... ! 30: help, save buffer name ! 31: <~EMACS/macros/spell_help ! 32: ��<Continue? ! 33: help done, now go back ! 34: B%� note extra back compensates for forward at end of loop ! 35: ����anything else, just beep ! 36: �1return to 1 window mode ! 37:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.