|
|
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.