From: erickson Date: Fri, 17 Sep 2010 18:42:27 +0000 (+0000) Subject: added option to vandelay rec list import that forces it to respond to the client... X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=5665fb2df498e2b76a8e05e3fbcce7b57fd311aa;p=evergreen%2Fbjwebb.git added option to vandelay rec list import that forces it to respond to the client w/ every record processed, instead of throttled responses. this is useful for small batches where it's necessary to know the outcome of each record git-svn-id: svn://svn.open-ils.org/ILS/trunk@17772 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Vandelay.pm b/Open-ILS/src/perlmods/OpenILS/Application/Vandelay.pm index da3dca6b0..c794032c9 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Vandelay.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Vandelay.pm @@ -615,6 +615,7 @@ sub import_record_list_impl { my $auto_overlay_1match = $$args{auto_overlay_1match}; my $merge_profile = $$args{merge_profile}; my $bib_source = $$args{bib_source}; + my $report_all = $$args{report_all}; my $overlay_func = 'vandelay.overlay_bib_record'; my $auto_overlay_func = 'vandelay.auto_overlay_bib_record'; @@ -774,7 +775,7 @@ sub import_record_list_impl { $conn->respond({total => $total, progress => ++$count, imported => $rec_id, err_event => $e->die_event}); } - $conn->respond({total => $total, progress => $count, imported => $rec_id}) if (++$count % $step) == 0; + $conn->respond({total => $total, progress => $count, imported => $rec_id}) if (!$report_all and ++$count % $step) == 0; } # see if we need to mark any queues as complete