Subversion Repositories planix.SVN

#!/bin/rc
# lpsend.rc dialstring - run lpsend network!dialstring!printer
if (! ~ $DEBUG '')
        flag x +
if (! test -e /net/tcp/clone)
        exit 'no tcp'

dialstring=`{ndb/query sys $1 dom}
if (~ $#dialstring 0 || ~ $dialstring '')       # no dom for sys in ndb?
        dialstring=$1                           # use arg unchanged

lpsend tcp!^$dialstring^!printer
exit $status