From de880a478b513e12f874e3e825fc2d4d35132027 Mon Sep 17 00:00:00 2001
From: sushi <sushi>
Date: Tue, 14 Nov 2006 23:25:48 +0000
Subject: [PATCH] chris's extra line fix, to clear top label margin.

---
 barcodes/label-print-pdf.pl | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/barcodes/label-print-pdf.pl b/barcodes/label-print-pdf.pl
index fcf0020147..51d02612b8 100755
--- a/barcodes/label-print-pdf.pl
+++ b/barcodes/label-print-pdf.pl
@@ -131,6 +131,11 @@ foreach $item (@resultsloop) {
           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,
-- 
2.39.5