[Koha-cvs] koha/C4 Biblio.pm [rel_3_0]

[paul poulain]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	paul poulain <tipaul>	06/12/07 11:09:40

Modified files:
	C4             : Biblio.pm 

Log message:
	MAJOR FIX :
	the ->destroy() line destroys the zebra connection. When we are running koha as cgi, it's not a problem, as the script dies after each request.
	BUT for bulkmarcimport & mod_perl, the zebra conn must be persistant.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Biblio.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.178.2.36&r2=1.178.2.37

Patches:
Index: Biblio.pm
===================================================================
RCS file: /sources/koha/koha/C4/Biblio.pm,v
retrieving revision 1.178.2.36
retrieving revision 1.178.2.37
diff -u -b -r1.178.2.36 -r1.178.2.37
--- Biblio.pm	6 Dec 2006 16:54:21 -0000	1.178.2.36
+++ Biblio.pm	7 Dec 2006 11:09:39 -0000	1.178.2.37
@@ -33,7 +33,7 @@
 use vars qw($VERSION @ISA @EXPORT);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.178.2.36 $' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); };
+$VERSION = do { my @v = '$Revision: 1.178.2.37 $' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); };
 
 @ISA = qw( Exporter );
 
@@ -1375,7 +1375,7 @@
         "update biblioitems set marc=?,marcxml=?  where biblionumber=?");
     $sth->execute( $record->as_usmarc(), $record->as_xml_record(),
         $biblionumber );
-    warn $record->as_xml_record();
+#     warn $record->as_xml_record();
     $sth->finish;
     zebraop($dbh,$biblionumber,"specialUpdate","biblioserver");
     return $biblionumber;
@@ -3475,7 +3475,6 @@
          }
     }
     $Zpackage->destroy();
-    $Zconnbiblio[0]->destroy();
 }
 
 =head2 calculatelc
@@ -3572,8 +3571,13 @@
 
 =cut
 
-# $Id: Biblio.pm,v 1.178.2.36 2006/12/06 16:54:21 alaurin Exp $
+# $Id: Biblio.pm,v 1.178.2.37 2006/12/07 11:09:39 tipaul Exp $
 # $Log: Biblio.pm,v $
+# Revision 1.178.2.37  2006/12/07 11:09:39  tipaul
+# MAJOR FIX :
+# the ->destroy() line destroys the zebra connection. When we are running koha as cgi, it's not a problem, as the script dies after each request.
+# BUT for bulkmarcimport & mod_perl, the zebra conn must be persistant.
+#
 # Revision 1.178.2.36  2006/12/06 16:54:21  alaurin
 # restore function zebraop for delete biblios :
 #