[Koha-cvs] koha/barcodes label-add-layout.pl [dev_week]

Mason James szrj1m at yahoo.com
Mon Oct 22 06:38:05 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Mason James <sushi>	07/10/22 04:38:05

Modified files:
	barcodes       : label-add-layout.pl 

Log message:
	saving justify too

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-add-layout.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.1.2.2&r2=1.1.2.3

Patches:
Index: label-add-layout.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/Attic/label-add-layout.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-add-layout.pl	20 Oct 2007 17:04:29 -0000	1.1.2.2
+++ label-add-layout.pl	22 Oct 2007 04:38:05 -0000	1.1.2.3
@@ -32,8 +32,23 @@
 my @printingtypes   = get_printingtypes();
 my @layouts         = get_layouts();
 my @barcode_types   = get_barcode_types();
+my @text_justify  = get_text_justify();
 my @batches         = get_batches();
 
+
+my @title          = build_text_dropbox(  );
+my @subtitle       = build_text_dropbox(  );
+my @author         = build_text_dropbox(  );
+my @barcode        = build_text_dropbox(  );
+my @isbn           = build_text_dropbox(  );
+my @issn           = build_text_dropbox(  );
+my @itemtype       = build_text_dropbox(  );
+my @dewey          = build_text_dropbox(  );
+my @class          = build_text_dropbox(  );
+my @subclass       = build_text_dropbox(  );
+my @itemcallnumber = build_text_dropbox(  );
+my @ccode          = build_text_dropbox(  );
+
 if ( $op = 'add_layout' ) {
 }
 
@@ -51,6 +66,7 @@
   label_templates => \@label_templates,
   barcode_types   => \@barcode_types,
   printingtypes   => \@printingtypes,
+  text_justify    => \@text_justify,
   layout_loop     => \@layouts,
 
   batches     => \@batches,
@@ -58,17 +74,21 @@
   barcodetype => $data->{'barcodetype'},
   papertype   => $data->{'papertype'},
 
-  tx_author         => $data->{'author'},
-  tx_barcode        => $data->{'barcode'},
-  tx_title          => $data->{'title'},
-  tx_isbn           => $data->{'isbn'},
-  tx_issn           => $data->{'issn'},
-  tx_itemtype       => $data->{'itemtype'},
-  tx_dewey          => $data->{'dewey'},
-  tx_class          => $data->{'class'},
-  tx_subclass       => $data->{'subclass'},
-  tx_itemcallnumber => $data->{'itemcallnumber'},
-  tx_ccode          => $data->{'ccode'},
+
+
+ tx_title          => \@title,
+    tx_subtitle       => \@subtitle,
+    tx_author         => \@author,
+    tx_isbn           => \@isbn,
+    tx_issn           => \@issn,
+    tx_itemtype       => \@itemtype,
+    tx_dewey          => \@dewey,
+    tx_barcode        => \@barcode,
+    tx_classif        => \@class,
+    tx_subclass       => \@subclass,
+    tx_itemcallnumber => \@itemcallnumber,
+    tx_ccode => \@ccode,
+
 
   startlabel => $data->{'startlabel'},
   fontsize   => $active_template->{'fontsize'},





More information about the Koha-cvs mailing list