Return to xdpr.script CVS log

Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / clients / xpr

Annotation of researchv9/X11/src/X.V11R1/clients/xpr/xdpr.script, revision 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.