| rsc | 6174642 | 2005-08-31 02:15:26 +0000 | [diff] [blame] | 1 | #!/usr/local/plan9/bin/rc |
| 2 | |||||
| 3 | if (! ~ $DEBUG '') flag x + | ||||
| 4 | |||||
| 5 | if (~ $#* 0) *='' | ||||
| 6 | |||||
| 7 | for (j in $*) { | ||||
| 8 | if (~ $j '' || test -f $j) { | ||||
| 9 | lpinput $j lpsub process $LPPROC | | ||||
| 10 | lpdsend -d$OUTDEV -tf -H$LPMACHID -P$LPUSERID $DEST_HOST >[2]$LPLOGDIR/$LPDEST^.st | ||||
| 11 | } | ||||
| 12 | if not { | ||||
| 13 | echo $j cannot be opened >[1=2] | ||||
| 14 | } | ||||
| 15 | } | ||||