[PATCH 06/11] [SIGNED-OFF] bug 5579: reduce processing to log item changes

Galen Charlton gmcharlt at gmail.com
Fri Mar 4 01:09:35 CET 2011


* no need to record full bib MARC when logging
  change to an item record
* IDEA: set up a separate ItemLog syspref

Signed-off-by: Galen Charlton <gmcharlt at gmail.com>
Signed-off-by: Claire Hernandez <claire.hernandez at biblibre.com>
---
 C4/Items.pm |   11 ++---------
 1 files changed, 2 insertions(+), 9 deletions(-)

diff --git a/C4/Items.pm b/C4/Items.pm
index a866789..672ed95 100644
--- a/C4/Items.pm
+++ b/C4/Items.pm
@@ -33,6 +33,7 @@ use C4::Branch;
 require C4::Reserves;
 use C4::Charset;
 use C4::Acquisition;
+use Data::Dumper;
 
 use vars qw($VERSION @ISA @EXPORT);
 
@@ -509,15 +510,7 @@ sub ModItem {
     my $whole_item = GetItem($itemnumber) or die "FAILED GetItem($itemnumber)";
     ModZebra( $whole_item->{biblionumber}, "specialUpdate", "biblioserver", undef, undef );
 
-    unless (defined $unlinked_item_subfields) {
-        $unlinked_item_subfields = _parse_unlinked_item_subfields_from_xml($whole_item->{'more_subfields_xml'});
-    }
-    my $new_item_marc = _marc_from_item_hash($whole_item, $frameworkcode, $unlinked_item_subfields) 
-        or die "FAILED _marc_from_item_hash($whole_item, $frameworkcode)";
-    
-    #_replace_item_field_in_biblio($new_item_marc, $biblionumber, $itemnumber, $frameworkcode);
-	($new_item_marc       eq '0') and die "$new_item_marc is '0', not hashref";  # logaction line would crash anyway
-    logaction("CATALOGUING", "MODIFY", $itemnumber, $new_item_marc->as_formatted) if C4::Context->preference("CataloguingLog");
+    logaction("CATALOGUING", "MODIFY", $itemnumber, Dumper($item)) if C4::Context->preference("CataloguingLog");
 }
 
 =head2 ModItemTransfer
-- 
1.7.1




More information about the Koha-patches mailing list