[open-ils-commits] r10528 -
trunk/Open-ILS/src/perlmods/OpenILS/Application
svn at svn.open-ils.org
svn at svn.open-ils.org
Wed Sep 3 17:37:13 EDT 2008
Author: erickson
Date: 2008-09-03 17:37:08 -0400 (Wed, 03 Sep 2008)
New Revision: 10528
Modified:
trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
Log:
some more minor cleanup
Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm 2008-09-03 21:24:48 UTC (rev 10527)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm 2008-09-03 21:37:08 UTC (rev 10528)
@@ -224,15 +224,11 @@
}
-
$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);
More information about the open-ils-commits
mailing list