From: Bill Erickson <berick@esilibrary.com>
Date: Tue, 31 May 2011 19:24:09 +0000 (-0400)
Subject: Logic error fixes in Vandelay
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=aa2579147103fef0d17f249336c088d041b5b403;p=contrib%2FConifer.git

Logic error fixes in Vandelay

* When counting import failures, also count records that have no import
items attached

* Fixed problem w/ not setting import time/as on newly imported records

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
index b3e516b2f0..c2811d14ef 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm
@@ -489,7 +489,7 @@ sub retrieve_queued_records {
 
     if($$options{with_import_error}) {
 
-        $query->{from} = {$class => {vii => {type => 'right'}}};
+        $query->{from} = {$class => {vii => {type => 'left'}}};
         $query->{where}->{'-or'} = [
             {'+vqbr' => {import_error => {'!=' => undef}}},
             {'+vii' => {import_error => {'!=' => undef}}}
@@ -1121,6 +1121,7 @@ sub import_record_list_impl {
 
                     $logger->info("vl: successfully imported new $type record");
                     $rec->imported_as($record->id);
+                    $imported = 1;
                 }
             }
         }