add print test page v5
This commit is contained in:
10
apply.pl
10
apply.pl
@@ -1681,11 +1681,11 @@ sub test_print_queue( $$ )
|
||||
|
||||
my $ts = scalar( localtime( time() ) );
|
||||
|
||||
print( $fh "SMArT / MARS_NWE print queue test\n" );
|
||||
print( $fh "Server: $server\n" );
|
||||
print( $fh "Queue: $queue\n" );
|
||||
print( $fh "Time: $ts\n" );
|
||||
print( $fh "\nIf you can read this, the NetWare print queue accepted a test job.\n" );
|
||||
print $fh "SMArT / MARS_NWE print queue test\n";
|
||||
print $fh "Server: $server\n";
|
||||
print $fh "Queue: $queue\n";
|
||||
print $fh "Time: $ts\n";
|
||||
print $fh "\nIf you can read this, the NetWare print queue accepted a test job.\n";
|
||||
|
||||
if( ! close( $fh ) )
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user