Return to spell1 CVS log

Up to [Research Unix] / researchv9 / cmd / emacs / macros

Annotation of researchv9/cmd/emacs/macros/spell1, revision 1.1

1.1     ! root        1: �runs the spell command on the current buffer [MACRO]
        !             2: 
        !             3:  This macro runs spell on the file in the current buffer, and
        !             4:  finds all of the misspelled words in the buffer, allowing the
        !             5:  user to edit them.
        !             6: 
        !             7:  Move the cursor to the word to be found and type .
        !             8:  Type ^Z to go to next match of the same word, or to return to the list
        !             9:  of misspelled words if no match is found.
        !            10:  Repeat the above until done, then type � to exit this macro.
        !            11: 
        !            12: 0<Executing Spell
        !            13: 0          indicate that execution is in progress
        !            14:                     save the text file
        !            15: F                    put the filename on the stack
        !            16: 1<.exec
        !            17: 2                    put .exec in the lower window
        !            18: &spell -&�       spell <filename> >.exec
        !            19: 0<Enter M-0^Z to exit, or move cursor to word and enter ^Z to find it.
        !            20: ^�7~   while the cursor is moved to the next word and  is typed
        !            21:        <\<
        !            22:        &�+�+ concatenate "\<", the word, and "\>" on the stack
        !            23:        <\>
        !            24:        0>   duplicate the search word on the stack
        !            25:        �    goto the top of the text file
        !            26:        ^�0� while the word is found in the text file
        !            27:                0<Enter ^Z to find next occurence of word, or to return to word list.
        !            28:                |�� �       if edit returns failure (�)
        !            29:                        � ��           goto eof so search fails
        !            30:                �                      end if
        !            31:                                      move the cursor past the word
        !            32:                0>           duplicate the word on the stack
        !            33:        �              end while
        !            34:        -             pop the word from the stack
        !            35:        &   goto the next word in .exec
        !            36:        0<Enter M-0^Z to exit, or move cursor to word and enter ^Z to find it.
        !            37: �             end while
        !            38:   return to the text file and save the changes
        !            39: 1            drop spelling list window to signal end of spell
        !            40: 

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