Return to xdpp CVS log

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

Annotation of researchv9/X11/src/X.V11R1/clients/xpr/xdpp, revision 1.1

1.1     ! root        1: #! /bin/csh -f
        !             2: set prntr=(-Ppostscript)
        !             3: set flags=(-device ps) noglob
        !             4: unset dv
        !             5: unsetenv dv
        !             6: set dv=$DISPLAY
        !             7: top:
        !             8:        if ($#argv > 0) then
        !             9:                switch ($argv[1])
        !            10: 
        !            11:                case *\:*:
        !            12:                        set dv=$argv[1]
        !            13:                        shift argv
        !            14:                        goto top
        !            15: 
        !            16:                case -P?*:
        !            17:                        set prntr = $argv[1]
        !            18:                        shift argv
        !            19:                        goto top
        !            20: 
        !            21:                case -*:
        !            22:                        set flags = ($flags $argv[1])
        !            23:                        shift argv
        !            24:                        goto top
        !            25: 
        !            26:                endsw
        !            27:        endif
        !            28: 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.