X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=perl%2Flib%2FIDZebra%2FSession.pm;h=12837025f0f1390ea2c864c29304092fabcb6ad7;hb=75afa0301433673a23f5c7c8e1f8c78efb4a2d4c;hp=57dc36a4eb4c701c96374faeec181175d4564704;hpb=b9eea3a2ebd3feae59bc8c01a70dbe8b9e0b807a;p=idzebra-moved-to-github.git diff --git a/perl/lib/IDZebra/Session.pm b/perl/lib/IDZebra/Session.pm index 57dc36a..1283702 100644 --- a/perl/lib/IDZebra/Session.pm +++ b/perl/lib/IDZebra/Session.pm @@ -1,4 +1,4 @@ -# $Id: Session.pm,v 1.16 2003-05-07 20:51:12 pop Exp $ +# $Id: Session.pm,v 1.17 2003-05-21 08:03:02 pop Exp $ # # Zebra perl API header # ============================================================================= @@ -16,7 +16,7 @@ BEGIN { use IDZebra::ScanList; use IDZebra::RetrievalRecord; require Exporter; - our $VERSION = do { my @r = (q$Revision: 1.16 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; + our $VERSION = do { my @r = (q$Revision: 1.17 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; our @ISA = qw(IDZebra::Logger Exporter); our @EXPORT = qw (TRANS_RW TRANS_RO); } @@ -616,8 +616,6 @@ sub _search_pqf { my ($self, $query, $setname) = @_; my $hits = IDZebra::search_PQF($self->{zh}, - $self->{odr_input}, - $self->{odr_output}, $query, $setname);