[Koha-cvs] CVS: koha/C4 Print.pm,1.3.2.1,1.3.2.2
Steve Tonnesen
tonnesen at users.sourceforge.net
Thu Jun 20 22:30:08 CEST 2002
Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv618
Modified Files:
Tag: rel-1-2
Print.pm
Log Message:
Cosmetic changes. Now identical to copy in main.
Index: Print.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Print.pm,v
retrieving revision 1.3.2.1
retrieving revision 1.3.2.2
diff -C2 -r1.3.2.1 -r1.3.2.2
*** Print.pm 25 Apr 2002 21:59:55 -0000 1.3.2.1
--- Print.pm 20 Jun 2002 20:30:06 -0000 1.3.2.2
***************
*** 21,28 ****
my $file=time;
my $queue = $env->{'queue'};
! if ($queue eq "") {
open (PRINTER,">/tmp/kohaiss");
} else {
! open(PRINTER, "| lpr -P $queue") or die "Couldn't write to queue:$!\n";
}
# print $queue;
--- 21,28 ----
my $file=time;
my $queue = $env->{'queue'};
! if ($queue eq "" || $queue eq 'nulllp') {
open (PRINTER,">/tmp/kohaiss");
} else {
! open(PRINTER, "| lpr -P $queue") or die "Couldn't write to queue:$queue\n";
}
# print $queue;
More information about the Koha-cvs
mailing list