[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