removed another version of the ingest race condition

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12429 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm b/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
index d7278d8..40b13ed 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
@@ -160,12 +160,20 @@ sub biblio_record_replace_marc  {
        return $e->die_event unless $e->checkauth;
        return $e->die_event unless $e->allowed('CREATE_MARC', $e->requestor->ws_ou);
 
+    my $no_ingest = 1;
+
     my $res = OpenILS::Application::Cat::BibCommon->biblio_record_replace_marc(
         $e, $recid, $newxml, $source, 
         $self->api_name =~ /replace/o,
-        $self->api_name =~ /override/o);
+        $self->api_name =~ /override/o,
+       $no_ingest
+    );
 
     $e->commit unless $U->event_code($res);
+
+    my $ses = OpenSRF::AppSession->create('open-ils.ingest');
+    $ses->request('open-ils.ingest.full.biblio.record', $recid);
+
     return $res;
 }