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

1.1     ! root        1: L                    Edit a List of Files or (arg != 1) of manual pages
        !             2: 
        !             3: C. Douglas Blewett (DR30L19) Version 4
        !             4: 
        !             5: This file contains a command that allows the user to edit
        !             6: (recursively) a list of files.  This is much like vi's :next
        !             7: command.  The list of files is collected in .exec and the files
        !             8: are edited in .list.  This is useful for making changes in a global
        !             9: variable that appears in a list of files (e.g. ^XL *.c).
        !            10: 
        !            11: If an argument other than 1 is given then the command looks up the
        !            12: file name in the directories known to contain manual pages.  This
        !            13: routine contains a string with embedded paths to the manual
        !            14: directories.
        !            15: 
        !            16: An "ls -d" is performed, so full Bourne shell style wild carding is
        !            17: available.  This is very useful for manual page searches
        !            18: (e.g. ^U^XL *open*).
        !            19: 
        !            20: Modified to preserve the sanity of .exec. Saves the point, mark,
        !            21: and extent of .exec.
        !            22: 
        !            23:        B<List of files ?
        !            24:        0>                           Get the string
        !            25:        <
        !            26:        |�                            Input Conditional
        !            27:                �&                    Check for Null string
        !            28:                        -<
        !            29:                �                              Null Check End
        !            30:                �                              Default
        !            31:                        0<Wait
        !            32:                        0                           Print "Wait"
        !            33:                        <.exec
        !            34:                                                             Move to .exec
        !            35:                        6�0=7�1=         Current pos.
        !            36:                        8�0=9�1=     Save the mark
        !            37:                        �                           Meta Moon
        !            38:                        5�0=                                Save the eoB
        !            39:                        |�                            Check for man
        !            40:                                �1~1     Arg == 1 normal list
        !            41:                                        exec /bin/ls -d -&
        !            42:                                �
        !            43:                                �                      man request
        !            44:                                        exec ls -d /usr/man/man?/.* /usr/ncmp/man/man?/.* /usr/man/local/.*-&
        !            45:                                �
        !            46:                        �
        !            47:                        <usilent
        !            48:                        �
                           Run the command
        !            49:                        &�5�&<usilent
        !            50:                        
                           Reset usilent
        !            51:                        |�
        !            52:                                �1~1     Arg == 1 normal list
        !            53:                                �
        !            54:                                �                      man request
        !            55:                                        <not found
        !            56:                                        ^��
        !            57:                                                &1-
        !            58:                                                <not found
        !            59:                                        �
        !            60:                                        5�&
        !            61:                                �
        !            62:                        �
        !            63:                        �1                          TRUE = 1
        !            64:                        ^�4~0          Loop forever
        !            65:                                ^�           Loop through filenames
        !            66:                                        <.list
        !            67:                                           Read in the file
        !            68:                                        0<Editing a List of Files: ^Z to move to the next file
        !            69:                                        0   Print "List"
        !            70:                                                     Edit the file
        !            71:                                        <.exec
        !            72:                                                     Move back and cleanup
        !            73:                                        &             The rest of the line
        !            74:                                �
        !            75:                                5�&�0
        !            76:                                !�-<End of List: r to Rewind or Press Return
        !            77:                                        �r     Rewind
        !            78:                                                0<Rewinding
        !            79:                                                0
        !            80:                                                -
        !            81:                                        �
        !            82:                                        ��
        !            83:                                                �0  Zero == FALSE
        !            84:                                        �
        !            85:                                �                              Rewind End
        !            86:                        �                              Forever End
        !            87:                        5�-��-6�7�
        !            88:                        8�9     Reset point and mark
        !            89:                        %           Cleanup and Move back
        !            90:                        <.list
        !            91:                        
        !            92:                �                              Default End
        !            93:        �                              Input Conditional End
        !            94:        0<
        !            95:        0           Cleanup of Print "Wait" and "List"
        !            96: 

unix.superglobalmegacorp.com

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