[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/barcodes label-print-select-pdf.pl [dev_week]
From: |
Mason James |
Subject: |
[Koha-cvs] koha/barcodes label-print-select-pdf.pl [dev_week] |
Date: |
Tue, 28 Aug 2007 23:07:54 +0000 |
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");