Annotation of 43BSDTahoe/new/help/maint/do.new, revision 1.1.1.1

1.1       root        1: #      Install New Help Topics.
                      2: # Called by help as:  csh -f do.new dir [ topic ] ...
                      3: 
                      4: set subtree = $1:h                     # get subtree by removing /cat tail
                      5: shift                                  # throw away directory argument
                      6: source $subtree/maint/config           # configure system
                      7: cd $subtree/src
                      8: if ($#argv == 0) then
                      9: cat << %
                     10: Usage:  help -m new topic ...
                     11: where topic is a file of nroff (-mayday) source in the directory
                     12: $subtree/src.  A topic called . will re-install all topics.
                     13: %
                     14: exit 1
                     15: else if ($1 == .) then
                     16:        echo -n "Re-installing ALL topics?  Type $$ to confirm: "
                     17:        if ($< != $$) then
                     18:                echo "Not confirmed.  Bye."
                     19:                exit 1
                     20:        endif
                     21:        set argv = (.)
                     22: endif
                     23: set tmp
                     24: foreach t ($*)
                     25:        if ($t == index_help)   set there_already
                     26:        set tmp = ($tmp `find $t -print`)
                     27: end
                     28: set argv = ($tmp)
                     29: echo "Correct the following if necessary.  Defaults are shown in ()."
                     30: if (! $?there_already) then
                     31:        echo -n "Do you want a new index_help? (n) "
                     32:        if ($< =~ y*)   set argv = ($argv index_help)
                     33: endif
                     34: echo -n "Topics? ($*) "
                     35: set tmp = ($<)
                     36: if ("$tmp" != "")   set argv = ($tmp)
                     37: echo -n "Sources to? ($srcmach) "
                     38: set tmp = ($<)
                     39: if ("$tmp" != "")   set srcmach = ($tmp)
                     40: echo -n "Catables to? ($catmach) "
                     41: set tmp = ($<)
                     42: if ("$tmp" != "")   set catmach = ($tmp)
                     43: echo -n "Old catables to? ($oldmach) "
                     44: set tmp = ($<)
                     45: if ("$tmp" != "")   set oldmach = ($tmp)
                     46: echo "OK.  Backgrounding."
                     47: source $subtree/maint/new &                    # the real work

unix.superglobalmegacorp.com

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