[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