[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/barcodes label-print-pdf.pl [rel_2_2]
From: |
Mason James |
Subject: |
[Koha-cvs] koha/barcodes label-print-pdf.pl [rel_2_2] |
Date: |
Tue, 14 Nov 2006 23:25:48 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_2_2
Changes by: Mason James <sushi> 06/11/14 23:25:48
Modified files:
barcodes : label-print-pdf.pl
Log message:
chris's extra line fix, to clear top label margin.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-print-pdf.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.13&r2=1.1.2.14
Patches:
Index: label-print-pdf.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-print-pdf.pl,v
retrieving revision 1.1.2.13
retrieving revision 1.1.2.14
diff -u -b -r1.1.2.13 -r1.1.2.14
--- label-print-pdf.pl 1 Aug 2006 03:44:41 -0000 1.1.2.13
+++ label-print-pdf.pl 14 Nov 2006 23:25:48 -0000 1.1.2.14
@@ -131,6 +131,11 @@
qw (dewey isbn classification itemtype subclass itemcallnumber);
my $vPos = ( $y_pos + ( $label_height - $top_text_margin ) );
my $hPos = ( $x_pos_spine + $left_text_margin );
+
+# chris's extra line fix, to clear top label margin.
+ prText( $hPos, $vPos, "\n" );
+ $vPos = $vPos - $line_spacer;
+
foreach my $field (@fields) {
# if the display option for this field is selected in the DB,
- [Koha-cvs] koha/barcodes label-print-pdf.pl [rel_2_2],
Mason James <=