[Koha-cvs] koha/barcodes label-print-select-pdf.pl [dev_week]
Mason James
szrj1m at yahoo.com
Wed Aug 29 01:07:54 CEST 2007
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Mason James <sushi> 07/08/28 23:07:54
Modified files:
barcodes : label-print-select-pdf.pl
Log message:
tidy
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-print-select-pdf.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.1.2.2&r2=1.1.2.3
Patches:
Index: label-print-select-pdf.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/Attic/label-print-select-pdf.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -u -b -r1.1.2.2 -r1.1.2.3
--- label-print-select-pdf.pl 28 Aug 2007 23:06:06 -0000 1.1.2.2
+++ label-print-select-pdf.pl 28 Aug 2007 23:07:54 -0000 1.1.2.3
@@ -1,6 +1,5 @@
#!/usr/bin/perl
-
use strict;
use CGI;
use C4::Labels;
@@ -11,9 +10,8 @@
use C4::Context;
use HTML::Template;
-
# get the printing settings
-my $conf_data = get_label_options();
+#my $conf_data = get_label_options();
my $cgi = new CGI;
# get batchid and active template
@@ -21,8 +19,9 @@
my $template = GetActiveLabelTemplate();
-if ($template->{'tmpl_code'} eq 'demco_142-1685_C') {
- print $cgi->redirect("/cgi-bin/koha/barcodes/label-print-pdf-demco-142-1685c.pl");
+if ( $template->{'tmpl_code'} eq 'demco_142-1685_C' ) {
+ print $cgi->redirect(
+ "/cgi-bin/koha/barcodes/label-print-pdf-demco-142-1685c.pl");
}
else {
print $cgi->redirect("/cgi-bin/koha/barcodes/label-print-pdf.pl");
More information about the Koha-cvs
mailing list