[Koha-cvs] koha/barcodes label-print-pdf.pl [dev_week]

Mason James szrj1m at yahoo.com
Sun Oct 21 03:00:24 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Mason James <sushi>	07/10/21 01:00:24

Modified files:
	barcodes       : label-print-pdf.pl 

Log message:
	removing hardcoded 'L' justifys

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-print-pdf.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.1.2.2.2.19&r2=1.1.2.2.2.20

Patches:
Index: label-print-pdf.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-print-pdf.pl,v
retrieving revision 1.1.2.2.2.19
retrieving revision 1.1.2.2.2.20
diff -u -b -r1.1.2.2.2.19 -r1.1.2.2.2.20
--- label-print-pdf.pl	20 Oct 2007 16:25:01 -0000	1.1.2.2.2.19
+++ label-print-pdf.pl	21 Oct 2007 01:00:24 -0000	1.1.2.2.2.20
@@ -33,9 +33,13 @@
 my $printingtype = $conf_data->{'printingtype'};
 my $guidebox     = $conf_data->{'guidebox'};
 my $start_label  = $conf_data->{'startlabel'};
+
+my $text_justify   = $conf_data->{'text_justify'};
 my $fontsize     = $template->{'fontsize'};
 my $units        = $template->{'units'};
 
+### $text_justify
+
 ### conf_data
 ### $printingtype;
 ### $barcodetype
@@ -161,8 +165,8 @@
       $barcodetype );
 
     draw_text_block_manual(
-      $x_pos,    $y_pos, $label_width,      $label_height,
-      $fontsize, 0,      $left_text_margin, 'l',
+      $x_pos,    $y_pos, $label_width,   $text_height,
+      $fontsize, 0,      $left_text_margin, $text_justify ,
       @fields
     );
 
@@ -174,7 +178,7 @@
 
     draw_text_block_manual(
       $x_pos,    $y_pos, $label_width,      $label_height,
-      $fontsize, 0,      $left_text_margin, 'l',
+      $fontsize, 0,      $left_text_margin, $text_justify,
       @fields
     );
 
@@ -191,7 +195,7 @@
 
     draw_text_block_manual(
       $x_pos,    $y_pos, $label_width,      $label_height,
-      $fontsize, 0,      $left_text_margin, 'l',
+      $fontsize, 0,      $left_text_margin, $text_justify ,
       @fields
     );
 
@@ -204,7 +208,7 @@
 
     draw_text_block_manual(
       $x_pos,    $y_pos, $label_width,      $label_height,
-      $fontsize, 0,      $left_text_margin, 'l',
+      $fontsize, 0,      $left_text_margin, $text_justify ,
       @fields
     );
 





More information about the Koha-cvs mailing list