From f72c2df31ebd54b80e47da886db2a4ffb568d45e Mon Sep 17 00:00:00 2001
From: kados <kados>
Date: Sun, 24 Sep 2006 20:00:51 +0000
Subject: [PATCH] Committing some improvements to Amazon.pm

Updating AuthoritiesMarc to use new API in Biblio

Improvements to Auth, Output and Search

Adding Record.pm for record management
---
 C4/AuthoritiesMarc.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm
index 5647c6207d..8a293cc9e3 100644
--- a/C4/AuthoritiesMarc.pm
+++ b/C4/AuthoritiesMarc.pm
@@ -121,7 +121,7 @@ my $counter = $offset;
 $length=10 unless $length;
 my @oAuth;
 my $i;
- $oAuth[0]=C4::Context->Zconnauth("authorityserver");
+ $oAuth[0]=C4::Context->Zconn("authorityserver",1,1);
 my ($mainentry)=MARCfind_attr_from_kohafield("mainentry");
 my ($allentry)=MARCfind_attr_from_kohafield("allentry");
 
@@ -738,7 +738,7 @@ $oConnection[0]->destroy();
 		if ($update==1){
 		my $biblionumber=XML_readline_onerecord($xmlhash,"biblionumber","biblios");
 		my $frameworkcode=MARCfind_frameworkcode($dbh,$biblionumber);
-		NEWmodbiblio($dbh,$biblionumber,$xmlhash,$frameworkcode) ;
+		ModBiblio($dbh,$biblionumber,$xmlhash,$frameworkcode) ;
 		}
 		
      }#foreach $xmlhash
-- 
2.39.5