repaired key names in json query response

git-svn-id: svn://svn.open-ils.org/ILS/trunk@15855 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 ce7e437..2dd3607 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Vandelay.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Vandelay.pm
@@ -624,7 +624,7 @@ sub import_record_list_impl {
                     }
                 )->[0];
 
-                $imported = 1 if $res->{overlay_bib_record} eq 't';
+                $imported = 1 if $res->{'vandelay.overlay_bib_record'} eq 't';
 
             } elsif( scalar(@{$rec->matches}) == 1 ) {
                 
@@ -645,7 +645,7 @@ sub import_record_list_impl {
                         }
                     )->[0];
 
-                    $imported = 1 if $res->{overlay_bib_record} eq 't';
+                    $imported = 1 if $res->{'vandelay.overlay_bib_record'} eq 't';
 
                 } elsif($auto_overlay_exact) { 
                     
@@ -661,7 +661,7 @@ sub import_record_list_impl {
                         }
                     )->[0];
 
-                    $imported = 1 if $res->{auto_overlay_bib_record} eq 't';
+                    $imported = 1 if $res->{'vandelay.auto_overlay_bib_record'} eq 't';
                 }
             }