From 603df25299fba8961706a073964ff212c77eee1c Mon Sep 17 00:00:00 2001
From: sushi <sushi>
Date: Wed, 19 Apr 2006 05:06:02 +0000
Subject: [PATCH] Removed character padding around $barcode, used for testing.

---
 barcodes/label-print-pdf.pl | 17 -----------------
 1 file changed, 17 deletions(-)

diff --git a/barcodes/label-print-pdf.pl b/barcodes/label-print-pdf.pl
index d2a178c11b..4457362015 100755
--- a/barcodes/label-print-pdf.pl
+++ b/barcodes/label-print-pdf.pl
@@ -292,12 +292,6 @@ sub build_circ_barcode {
     #$DB::single = 1;
 
     if ( $barcodetype eq 'EAN13' ) {
-
-        #testing EAN13 barcodes hack
-        $value = $value . '000000000';
-        $value =~ s/-//;
-        $value = substr( $value, 0, 12 );
-
         eval {
   	    PDF::Reuse::Barcode::EAN13(
                 x     => ( $x_pos_circ + 32 ),
@@ -334,12 +328,6 @@ sub build_circ_barcode {
 
     elsif ( $barcodetype eq 'Matrix2of5' ) {
 
-        #testing MATRIX25  barcodes hack
-        #    $value = $value.'000000000';
-        $value =~ s/-//;
-
-        #    $value = substr( $value, 0, 12 );
-
         eval {
             PDF::Reuse::Barcode::Matrix2of5(
                 x     => ( $x_pos_circ + 27 ),
@@ -359,11 +347,6 @@ sub build_circ_barcode {
 
     elsif ( $barcodetype eq 'EAN8' ) {
 
-        #testing ean8 barcodes hack
-        $value = $value . '000000000';
-        $value =~ s/-//;
-        $value = substr( $value, 0, 8 );
-
         eval {
             PDF::Reuse::Barcode::EAN8(
                 x       => ( $x_pos_circ + 42 ),
-- 
2.20.1