Bug 5385 - Fixing an error that crept in with the POD cleanup
authorChris Cormack <chrisc@catalyst.net.nz>
Thu, 11 Nov 2010 21:38:42 +0000 (10:38 +1300)
committerChris Nighswonger <chris.nighswonger@gmail.com>
Fri, 12 Nov 2010 00:48:15 +0000 (19:48 -0500)
(cherry picked from commit 9c6db56a3f807c819be5e724f423a212fa4b362c)

Signed-off-by: Chris Nighswonger <chris.nighswonger@gmail.com>
C4/Barcodes/PrinterConfig.pm

index 28854df..af6a92e 100644 (file)
@@ -73,6 +73,11 @@ C<$pageType> Page type to print (eg: a4, legal, etc).
 
 =cut
 
+# Globals used by the functions
+my @positionsForX;
+my @positionsForY;
+my $firstLabel = 1;
+
 sub setPositionsForX {
        my ($marginLeft, $labelWidth, $columns, $pageType) = @_;
        my $defaultDpi = 72/25.4; # By default we know 25.4 mm -> 1 inch -> 72 dots per inch