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 b3e516b..c2811d1 100644 (file)
--- 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;
                 }
             }
         }