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

[Joshua Ferraro]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Joshua Ferraro <kados>  06/07/20 18:32:24

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

Log message:
        adding itemcallnumber and subclass

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.3&r2=1.1.2.4
http://cvs.savannah.gnu.org/viewcvs/koha/barcodes/label-print.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.3&r2=1.1.2.4

Patches:
Index: label-print-pdf.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-print-pdf.pl,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -b -r1.1.2.3 -r1.1.2.4
--- label-print-pdf.pl  19 Jul 2006 01:37:23 -0000      1.1.2.3
+++ label-print-pdf.pl  20 Jul 2006 18:32:24 -0000      1.1.2.4
@@ -247,6 +247,19 @@
                 $item->{'classification'} );
             $vPos = $vPos - $vPosSpacer;
         }
+               if ( $conf_data->{'subclass'} && $item->{'subclass'} ) {
+            ( $hPos, $vPos1 ) = $pdf->getAddTextPos();
+            $pdf->centerString( $hPos, $hPosEnd, $vPos,
+                $item->{'subclass'} );
+            $vPos = $vPos - $vPosSpacer;
+        }
+               if ( $conf_data->{'itemcallnumber'} && 
$item->{'itemcallnumber'} ) {
+            ( $hPos, $vPos1 ) = $pdf->getAddTextPos();
+            $pdf->centerString( $hPos, $hPosEnd, $vPos,
+                $item->{'itemcallnumber'} );
+            $vPos = $vPos - $vPosSpacer;
+        }
+
 
         if ( $conf_data->{'itemtype'} && $item->{'itemtype'} ) {
             ( $hPos, $vPos1 ) = $pdf->getAddTextPos();

Index: label-print.pl
===================================================================
RCS file: /sources/koha/koha/barcodes/label-print.pl,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -b -r1.1.2.3 -r1.1.2.4
--- label-print.pl      20 Jul 2006 15:30:16 -0000      1.1.2.3
+++ label-print.pl      20 Jul 2006 18:32:24 -0000      1.1.2.4
@@ -126,9 +126,6 @@
                  subclass_opt => $conf_data->{'subclass'},
                  itemcallnumber_opt => $conf_data->{'itemcallnumber'},
 
-
-
-
     intranetcolorstylesheet =>
       C4::Context->preference("intranetcolorstylesheet"),
     intranetstylesheet => C4::Context->preference("intranetstylesheet"),