useful error detection...

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Utils/Fieldmapper.pm b/Open-ILS/src/perlmods/OpenILS/Utils/Fieldmapper.pm
index 4a9696e..ef0793e 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Utils/Fieldmapper.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Utils/Fieldmapper.pm
@@ -259,7 +259,7 @@ sub AUTOLOAD {
        }
 
        die "No field by the name $field in $class_name!"
-               unless (exists $$fieldmap{$class_name}{fields}{$field});
+               unless (exists $$fieldmap{$class_name}{fields}{$field} && defined($pos));
 
 
        {       no strict 'subs';