From be5b9bd4dae9650eee17a840f8e4ea2baa02a5b5 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Mon, 3 Mar 2008 10:37:59 -0600 Subject: [PATCH] removed lock tables for authority updates Signed-off-by: Joshua Ferraro --- C4/AuthoritiesMarc.pm | 3 --- 1 file changed, 3 deletions(-) diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index c2c545c069..7693dae58c 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -556,7 +556,6 @@ sub AddAuthority { $record->insert_fields_ordered(MARC::Field->new('001',$authid)); } # warn $record->as_formatted; - $dbh->do("lock tables auth_header WRITE"); $sth=$dbh->prepare("insert into auth_header (authid,datecreated,authtypecode,marc,marcxml) values (?,now(),?,?,?)"); $sth->execute($authid,$authtypecode,$record->as_usmarc,$record->as_xml_record($format)); $sth->finish; @@ -565,12 +564,10 @@ sub AddAuthority { $oldRecord = GetAuthority($authid); } $record->add_fields('001',$authid) unless ($record->field('001')); - $dbh->do("lock tables auth_header WRITE"); my $sth=$dbh->prepare("update auth_header set marc=?,marcxml=? where authid=?"); $sth->execute($record->as_usmarc,$record->as_xml_record($format),$authid); $sth->finish; } - $dbh->do("unlock tables"); ModZebra($authid,'specialUpdate',"authorityserver",$oldRecord,$record); return ($authid); } -- 2.39.5