Return to makind1 CVS log

Up to [Research Unix] / researchv10dc / man / adm

Annotation of researchv10dc/man/adm/makind1, revision 1.1

1.1     ! root        1: cd $1
        !             2: for i in *
        !             3: do
        !             4:        sed -n "
        !             5:        /^.TH *[^ ]* */{
        !             6:                s///
        !             7:                s/ .*//
        !             8:                h
        !             9:        }
        !            10:        /SH.*NAM/{
        !            11:                N
        !            12:                s/.*\n//
        !            13:                :x
        !            14:                N
        !            15:                /\\n.SH.*/{
        !            16:                        s///
        !            17:                        s/^/$i /
        !            18:                        s/\.[^ .]* / /
        !            19:                        s/\\n/ /g
        !            20:                        s/  */ /g
        !            21:                        G
        !            22:                        s/\([^ ]*\)\(.*\)\n\(.*\)/\1(\3)\2/
        !            23:                        s/[A-Z])/)/
        !            24:                        p
        !            25:                        d
        !            26:                }
        !            27:                s/\n\..*//
        !            28:                bx
        !            29:        }
        !            30: " $i
        !            31: done 
        !            32: exit
        !            33: # add to shell script to get file references
        !            34: # in this case, pipe output thru uniq
        !            35:        /^\.RF *[^ ]*/s//.F/
        !            36:        /^\.FR\(.* \).*/s//.F \1/
        !            37:        /^\.F  */{
        !            38:                s//$i /
        !            39:                s/\.[^ .]*//
        !            40:                G
        !            41:                s/\([^ ]*\)\(.*\)\n\(.*\)/\1(\3)\2/
        !            42:                s/[A-Z+])/)/
        !            43:                p
        !            44:        }

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