1 files changed, 5 insertions, 2 deletions
diff --git a/src/rt/Database.cc b/src/rt/Database.cc
index df6ec0a3..81d6f83a 100644
--- a/src/rt/Database.cc
+++ b/src/rt/Database.cc
@@ -51,8 +51,11 @@ namespace OpenAxiom {
             reader.position(n);
             toc = Lisp::retract_to_pair(ctx.make_value(reader.read()));
          }
-         else if (auto data = Lisp::assoc(key, toc))
-            return dict.insert({ key, data }).first->second;
+         else {
+            auto data = Lisp::assoc(key, toc);
+            if (data != nil)
+               return dict.insert({ key, data }).first->second;
+         }
          return nil;
       }
    }