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

Mason James szrj1m at yahoo.com
Tue Aug 28 00:52:35 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Mason James <sushi>	07/08/27 22:52:35

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

Log message:
	3 label block working...

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

Patches:
Index: label-printf-pdf.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/Attic/label-printf-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-printf-pdf.pl	27 Aug 2007 22:36:44 -0000	1.1.2.2
+++ label-printf-pdf.pl	27 Aug 2007 22:52:35 -0000	1.1.2.3
@@ -168,7 +168,6 @@
         $item->{copyrightdate} );
 
 my @circ2_fields = ( 
-'_',
   $item->{author},
   $item->{title});
 
@@ -186,22 +185,27 @@
   drawbox( $x_pos, $y_pos, $block_width,  $block_height,  ) if $guidebox;
   drawbox( $x_pos, $y_pos+20, $spine_width,  $spine_height,  ) if $guidebox;
 
-    draw_text_block_manual2( $x_pos, $y_pos+20, $spine_width, $spine_height, $fontsize,      $gutter,    'l', @spine_fields);
+    draw_text_block_manual2( $x_pos, $y_pos+20, $spine_width, $spine_height, $fontsize, '',     $gutter,    'l', @spine_fields);
 
 
  drawbox(     $x_pos+30, $y_pos+50, $label_width,  $label_height,  ) if $guidebox;
-    draw_text_block_manual2( $x_pos+30, $y_pos+50, $label_width, $label_height, $fontsize,      $gutter, 'r', @circ_barcode);
+    draw_text_block_manual2( $x_pos+30, $y_pos+50, $label_width, $label_height, $fontsize,  '',    $gutter, 'r', @circ_barcode);
 
-    draw_text_block_manual2( $x_pos+30, $y_pos+50, $label_width, $label_height, $fontsize,      $gutter, , '' , @circ_fields);
+    draw_text_block_manual2( $x_pos+30, $y_pos+50, $label_width, $label_height, $fontsize,  '',    $gutter, , '' , @circ_fields);
 
-    draw_text_block_manual2( $x_pos+$spine_width+30, $y_pos+50, $label_width, $label_height, $fontsize,      $gutter,  'l' , @circ2_fields);
+    draw_text_block_manual2( $x_pos+$spine_width+30, $y_pos+50, $label_width, $label_height, $fontsize,  2,    $gutter,  'l' , @circ2_fields);
 
 
  
   
-#  drawbox( $x_pos+30, $y_pos , $label_width,  $label_height,  ) if $guidebox;
+  drawbox( $x_pos+30, $y_pos , $label_width,  $label_height,  ) if $guidebox;
+    draw_text_block_manual2( $x_pos+30, $y_pos, $label_width, $label_height, $fontsize,  '',    $gutter, 'r', @circ_barcode);
+
+    draw_text_block_manual2( $x_pos+30, $y_pos, $label_width, $label_height, $fontsize,  '',    $gutter, , '' , @circ_fields);
+
+    draw_text_block_manual2( $x_pos+$spine_width+30, $y_pos, $label_width, $label_height, $fontsize,  2,    $gutter,  'l' , @circ2_fields);
+
 
-#  draw_text_block_manual2( $x_pos+30, $y_pos, $label_width, $label_height, $fontsize,      $gutter, 'r', @circ2_fields);
 
 
 





More information about the Koha-cvs mailing list