|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T g
Length: 611 (0x263)
Types: TextFile
Names: »glpq«
└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89
└─⟦this⟧ »./DVIware/laser-setters/quicspool/src/glpq«
└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
└─⟦af5ba6c8e⟧ »unix3.0/DVIWARE.tar.Z«
└─⟦ca79c7339⟧
└─⟦this⟧ »DVIware/laser-setters/quicspool/src/glpq«
#! /bin/csh
# $Header: glpq,v 1.1 88/01/15 13:04:09 simpson Rel $
# $Log: glpq,v $
#Revision 1.1 88/01/15 13:04:09 simpson
#initial release
#
#Revision 0.1 87/12/11 18:30:57 simpson
#beta test
#
set printers=(sneezy dopey grumpy)
set lpqflags
while ($#argv > 0)
switch ($1)
# if the -P option or a job number is given, only use one printer
case -P*:
lpq $lpqflags $*
exit
case [0-9]*:
lpq $lpqflags $*
exit
default:
set lpqflags=($lpqflags $1)
shift
breaksw
endsw
end
foreach i ($printers)
echo ${i}:
lpq -P$i $lpqflags
echo ${i}l:
lpq -P${i}l $lpqflags
end