[Koha-cvs] koha/C4 SearchMarc.pm
Joshua Ferraro
jmf at kados.org
Mon Feb 27 02:10:14 CET 2006
CVSROOT: /sources/koha
Module name: koha
Branch:
Changes by: Joshua Ferraro <kados at savannah.gnu.org> 06/02/27 01:10:14
Modified files:
C4 : SearchMarc.pm
Log message:
use new Context->Zconn object
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/SearchMarc.pm.diff?tr1=1.56&tr2=1.57&r1=text&r2=text
Patches:
Index: koha/C4/SearchMarc.pm
diff -u koha/C4/SearchMarc.pm:1.56 koha/C4/SearchMarc.pm:1.57
--- koha/C4/SearchMarc.pm:1.56 Thu Feb 16 03:12:15 2006
+++ koha/C4/SearchMarc.pm Mon Feb 27 01:10:14 2006
@@ -235,14 +235,8 @@
# warn "$i : ".@$tags[$i]. "=> $tag / $subfield = ".$tagslib->{$tag}->{$subfield}->{kohafield};
}
warn "QUERY : $query";
- my $Zconn;
- eval {
- $Zconn = new ZOOM::Connection(C4::Context->config("zebradb"));
- };
- $Zconn->option(cqlfile => C4::Context->config("intranetdir")."/zebra/pqf.properties");
- $Zconn->option(preferredRecordSyntax => "xml");
+ my $Zconn = C4::Context->Zconn or die "unable to set Zconn";
my $q = new ZOOM::Query::CQL2RPN( $query, $Zconn);
-# warn "ERROR : ".$Zconn->errcode();
my $rs = $Zconn->search($q);
my $numresults=$rs->size();
if ($numresults eq 0) {
More information about the Koha-cvs
mailing list