some more minor cleanup
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 3 Sep 2008 21:37:08 +0000 (21:37 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 3 Sep 2008 21:37:08 +0000 (21:37 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@10528 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Cat.pm

index f602e6a..cf4be5d 100644 (file)
@@ -224,15 +224,11 @@ sub biblio_record_replace_marc  {
     }
 
 
-
        $rec->source(bib_source_from_name($source)) if $source;
        $rec->editor($e->requestor->id);
        $rec->edit_date('now');
        $rec->marc( entityize( $marcdoc->documentElement->toString ) );
-
-       $logger->activity("user ".$e->requestor->id." replacing MARC for record $recid");
-
-       $e->update_biblio_record_entry($rec) or return $e->event;
+       $e->update_biblio_record_entry($rec) or return $e->die_event;
        $e->commit;
 
        $conn->respond_complete($rec);