X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=perl%2Flib%2FIDZebra%2FSession.pm;h=338adb6ae5b90d99cbd14782390540f36b1ee59e;hb=3adbc5bfe003fd7b3a105782b551c5d18fe65104;hp=f68df57060c4ca1952165016f21b0cf285905553;hpb=a9d007b7f9024da4d8e04370fcb9063ec1816378;p=idzebra-moved-to-github.git diff --git a/perl/lib/IDZebra/Session.pm b/perl/lib/IDZebra/Session.pm index f68df57..338adb6 100644 --- a/perl/lib/IDZebra/Session.pm +++ b/perl/lib/IDZebra/Session.pm @@ -1,16 +1,21 @@ -# $Id: Session.pm,v 1.5 2003-02-28 18:38:29 pop Exp $ +# $Id: Session.pm,v 1.6 2003-02-28 18:45:50 pop Exp $ # # Zebra perl API header # ============================================================================= -use strict; package IDZebra::Session; -use IDZebra; -use IDZebra::Logger qw(:flags :calls); -use IDZebra::Resultset; -use Scalar::Util; -use Carp; + use strict; -our @ISA = qw(IDZebra::Logger); +use warnings; + +BEGIN { + use IDZebra; + use IDZebra::Logger qw(:flags :calls); + use IDZebra::Resultset; + use Scalar::Util; + use Carp; + our $VERSION = do { my @r = (q$Revision: 1.6 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; + our @ISA = qw(IDZebra::Logger); +} 1; # -----------------------------------------------------------------------------