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 Cormack <chrisc@catalyst.net.nz>
Thu, 11 Nov 2010 21:38:42 +0000 (10:38 +1300)
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