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

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/11/28 15:15:04

Modified files:
	C4             : Biblio.pm 

Log message:
	sync with dev_week.
	(deleteditems table wasn't getting populaated because the execute was commented out. This puts it back
		-- some table changes are needed as well, I'll commit those separately.)

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

Patches:
Index: Biblio.pm
===================================================================
RCS file: /sources/koha/koha/C4/Biblio.pm,v
retrieving revision 1.178.2.27
retrieving revision 1.178.2.28
diff -u -b -r1.178.2.27 -r1.178.2.28
--- Biblio.pm	20 Nov 2006 16:52:05 -0000	1.178.2.27
+++ Biblio.pm	28 Nov 2006 15:15:03 -0000	1.178.2.28
@@ -760,7 +760,7 @@
     $sth->execute( $record->as_usmarc(),$record->as_xml_record() , $biblionumber);
     warn $record->as_xml_record();
     $sth->finish;
-    &zebraop($dbh,$biblionumber,"specialUpdate","biblioserver");
+    #&zebraop($dbh,$biblionumber,"specialUpdate","biblioserver");
     return $biblionumber;
 }
 
@@ -2220,8 +2220,8 @@
 
     #  print $query;
     $sth = $dbh->prepare($query);
-#    $sth->execute(@bind);
-#    $sth->finish;
+    $sth->execute(@bind);
+    $sth->finish;
     $sth = $dbh->prepare("Delete from items where itemnumber=?");
     $sth->execute($itemnum);
     $sth->finish;
@@ -3494,9 +3494,11 @@
         #goto "reconnect";
         }elsif ($error==10007 && $tried<2) {## timeout --another 30 looonng seconds for this update
         $tried=$tried+1;
+        warn "warn: timeout, trying again";
         goto "retry";
     }elsif($error==10004 && $recon==0){##Lost connection -reconnect
         $recon=1;
+        warn "error: reconnecting to zebra";
         goto "reconnect";
     # as a last resort, we save the data to the filesystem to be indexed in batch
     }elsif ($error){
@@ -3643,8 +3645,13 @@
 
 =cut
 
-# $Id: Biblio.pm,v 1.178.2.27 2006/11/20 16:52:05 alaurin Exp $
+# $Id: Biblio.pm,v 1.178.2.28 2006/11/28 15:15:03 toins Exp $
 # $Log: Biblio.pm,v $
+# Revision 1.178.2.28  2006/11/28 15:15:03  toins
+# sync with dev_week.
+# (deleteditems table wasn't getting populaated because the execute was commented out. This puts it back
+# 	-- some table changes are needed as well, I'll commit those separately.)
+#
 # Revision 1.178.2.27  2006/11/20 16:52:05  alaurin
 # minor bugfixing :
 #