X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Foodml.lisp;fp=sql%2Foodml.lisp;h=5a966e7abd554a2bf811a021e792ea7960575222;hp=169fa89d70d6f0fe17e834749e9a27f337cfe2f8;hb=f2e97f7b39c1cf82b6f3d1cec9362e551761549e;hpb=336ddc51485bb6df9d9ea066ab40c47e129580ea

diff --git a/sql/oodml.lisp b/sql/oodml.lisp
index 169fa89..5a966e7 100644
--- a/sql/oodml.lisp
+++ b/sql/oodml.lisp
@@ -657,9 +657,13 @@
               (number (not (zerop val))))))
        ((wall-time duration) (parse-timestring val))
        (date (parse-datestring val))
-       (t (call-next-method))))
+       (list (let ((*read-eval* nil))
+               (read-from-string val)))
+       (t (error-converting-value val type database))))
     (t (typecase val
-         (string (read-from-string val))
+         (string
+          (let ((*read-eval* nil))
+            (read-from-string val)))
          (t (error-converting-value val type database))))))
 
 ;; ------------------------------------------------------------