Return to xdpr.script CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / new / X / xpr

Annotation of 43BSDTahoe/new/X/xpr/xdpr.script, revision 1.1.1.1

1.1       root        1: #! /bin/csh -f
                      2: # Copyright 1985, Massacusetts Institute of Technology.
                      3: set prntr=(-Pln03)
                      4: set flags=() noglob
                      5: unset dv
                      6: unsetenv dv
                      7: set dv=$DISPLAY
                      8: top:
                      9:        if ($#argv > 0) then
                     10:                switch ($argv[1])
                     11: 
                     12:                case *\:*:
                     13:                        set dv=$argv[1]
                     14:                        shift argv
                     15:                        goto top
                     16: 
                     17:                case -P?*:
                     18:                        set prntr = $argv[1]
                     19:                        shift argv
                     20:                        goto top
                     21: 
                     22:                case -*:
                     23:                        set flags = ($flags $argv[1])
                     24:                        shift argv
                     25:                        goto top
                     26: 
                     27:                endsw
                     28:        endif
                     29: xwd $dv | xpr $flags | lpr $prntr

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