Return to bundle CVS log

Up to [Research Unix] / researchv10dc / cmd / upas

Annotation of researchv10dc/cmd/upas/bundle, revision 1.1.1.1

1.1       root        1: #! /bin/sh
                      2: # bundle: group files into distribution package (K&Pike, p.98)
                      3: # recursive version (Ex. 3-17, p.99)
                      4: 
                      5: case $DEJA_VU in
                      6: '')
                      7:        echo '# To unbundle, sh this file'
                      8:        DEJA_VU='done'
                      9:        export DEJA_VU
                     10:        ;;
                     11: esac
                     12: for file
                     13: do
                     14:        if test -d $file
                     15:        then
                     16:                echo "mkdir $file 2>/dev/null"
                     17:                bundle $file/*
                     18:        else
                     19:                echo "echo $file 1>&2"
                     20:                echo "sed 's/^-//' >$file <<'!'"        # remove leading guard
                     21:                sed 's/^[^A-EG-Za-z0-9]/-&/' $file      # prepend a guard to some
                     22:                echo !
                     23:        fi
                     24: done

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