diff --git a/apply.pl b/apply.pl index 8e122ce..703c5f6 100644 --- a/apply.pl +++ b/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 ) ) {