tgsdev - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       tgsdev (470B)
       ---
            1 #!/usr/local/plan9/bin/rc
            2 
            3 fn local {
            4         GSDEVICE=`{echo $LPCLASS | 9 sed 's/(.*\+)?gs!([^+]*)(\+.*)?/\2/'}
            5         echo gs $GSDEVICE
            6         {
            7                 psdownload -f -H$PLAN9/postscript/font -mfontmap -plw+ \
            8                         < $LPDEST/$FILE(1) |
            9                 gs -sDEVICE'='$GSDEVICE -s'OUTPUTFILE='$OUTDEV -dSAFER -dNOPAUSE -dQUIET -dBATCH -
           10         } >[2]$PRINTLOG
           11 }
           12 fn remote {
           13         {
           14                 echo -d$LPDEST -pnoproc -M$SCHEDLINE(1) -u$SCHEDLINE(2)
           15                 cat $LPDEST/$FILE
           16                 sleep 5
           17         } | lpsend.rc $DEST_HOST
           18 }
           19 generic local remote ''