PrinterConfig.pm - BEGIN block VERSION and vars related to export.

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Joe Atzberger 2008-01-07 13:52:48 -06:00 committed by Joshua Ferraro
parent a52400b7bc
commit 8653b88ace

View file

@ -16,14 +16,17 @@ package C4::Barcodes::PrinterConfig;
# Suite 330, Boston, MA 02111-1307 USA
use strict;
require Exporter;
use vars qw($VERSION @EXPORT);
use PDF::API2;
use PDF::API2::Page;
# set the version for version checking
$VERSION = 0.01;
BEGIN {
# set the version for version checking
$VERSION = 0.02;
require Exporter;
@EXPORT = qw(&labelsPage &getLabelPosition setPositionsForX setPositionsForY);
}
=head1 NAME
@ -45,8 +48,6 @@ environment of the pdf file.
=cut
@EXPORT = qw(&labelsPage &getLabelPosition setPositionsForX setPositionsForY);
my @positionsForX; # Takes all the X positions of the pdf file.
my @positionsForY; # Takes all the Y positions of the pdf file.
my $firstLabel = 1; # Test if the label passed as a parameter is the first label to be printed into the pdf file.
@ -217,4 +218,4 @@ __END__
Koha Physics Library UNLP <matias_veleda@hotmail.com>
=cut
=cut