[Koha-cvs] koha label-home.pl [dev_week]
Mason James
szrj1m at yahoo.com
Tue Jul 3 09:52:54 CEST 2007
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Mason James <sushi> 07/07/03 07:52:54
Modified files:
. : label-home.pl
Log message:
added layouts
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/label-home.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.1.2.1.2.2&r2=1.1.2.1.2.3
Patches:
Index: label-home.pl
===================================================================
RCS file: /sources/koha/koha/Attic/label-home.pl,v
retrieving revision 1.1.2.1.2.2
retrieving revision 1.1.2.1.2.3
diff -u -b -r1.1.2.1.2.2 -r1.1.2.1.2.3
--- label-home.pl 3 Jul 2007 02:43:12 -0000 1.1.2.1.2.2
+++ label-home.pl 3 Jul 2007 07:52:54 -0000 1.1.2.1.2.3
@@ -28,7 +28,13 @@
my $active_template = GetActiveLabelTemplate();
my @label_templates = GetAllLabelTemplates();
-warn Dumper @label_templates;
+#warn Dumper @label_templates;
+
+my @layouts = get_layouts();
+my @barcode_types = get_barcode_types();
+
+warn Dumper @barcode_types;
+
$template->param( guidebox => 1 ) if ( $data->{'guidebox'} );
@@ -39,11 +45,16 @@
$template->param( "$data->{'barcodetype'}_checked" => 1 );
$template->param( "startrow" . $data->{'startrow'} . "_checked" => 1 );
+
$template->param(
itemtype => $data->{'itemtype'},
active_template => $data->{'active_template'},
label_templates => \@label_templates,
+ barcode_types => \@barcode_types,
+ layouts => \@layouts,
+
+
papertype => $data->{'papertype'},
author => $data->{'author'},
barcode => $data->{'barcode'},
More information about the Koha-cvs
mailing list