fixed variable name - removed some old code
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 14 Sep 2006 22:16:24 +0000 (22:16 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 14 Sep 2006 22:16:24 +0000 (22:16 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@6115 dcc99617-32d9-48b4-a31d-7c20da2025e4

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

index 749f574..77c97a2 100644 (file)
@@ -198,16 +198,13 @@ sub biblio_record_replace_marc  {
        $e->update_biblio_record_entry($rec) or return $e->event;
        $e->commit;
 
+       $conn->respond_complete($rec);
+
        $U->simplereq(
                'open-ils.ingest',
                'open-ils.ingest.full.biblio.record', $recid );
 
-       return $rec;
-
-       #$e->request('open-ils.worm.wormize.biblio', $recid) or return $e->event;
-       #$e->commit;
-
-       return $rec;
+       return undef;
 }
 
 
@@ -274,16 +271,13 @@ sub biblio_record_xml_import {
 
        $logger->debug("Sending record off to be wormized");
 
+       $client->respond_complete($record);
 
        $U->simplereq(
                'open-ils.ingest',
                'open-ils.ingest.full.biblio.record', $id );
 
-#      my $stat = $U->storagereq( 'open-ils.worm.wormize.biblio', $id );
-#      throw OpenSRF::EX::ERROR 
-#              ("Unable to wormize imported record") unless $stat;
-
-       return $record;
+       return undef;
 }