r10540: 17 May 2005 Kevin Rosenberg <kevin@rosenberg.net>

        * Version 3.1.14
        * sql/oodml.lisp: Properly handle when db-writer is NIL

diff --git a/ChangeLog b/ChangeLog
index a43a34ccc6e42931c47b73b79c7d6c8b720c72f0..d62aa4e485857e4e2afb6348013a8f0a911e4487 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+17 May 2005 Kevin Rosenberg <kevin@rosenberg.net>
+       * Version 3.1.14
+       * sql/oodml.lisp: Properly handle when db-writer is NIL
+
 11 May 2005 Kevin Rosenberg <kevin@rosenberg.net>
        * sql/expressions.lisp: Avoid using simple-string declaration when
        a non-simple string may be encountered. [issue noted by 

diff --git a/debian/changelog b/debian/changelog
index 4bcde127f5db754c0b6acb2b24a7dd3a53a73ddd..e1d9d69b2ca0a50a9820de4c1a7e87cfa74298fa 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,8 +1,14 @@
+cl-sql (3.1.14-1) unstable; urgency=low
+
+  * New upstream
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Tue, 17 May 2005 13:06:45 -0600
+
 cl-sql (3.1.13-1) unstable; urgency=low
 
   * New upstream
 
- -- Kevin M. Rosenberg <kmr@debian.org>  Thu,  5 May 2005 22:18:56 -0600
+ -- Kevin M. Rosenberg <kmr@debian.org>  Tue, 17 May 2005 13:06:24 -0600
 
 cl-sql (3.1.12-1) unstable; urgency=low
 

diff --git a/sql/oodml.lisp b/sql/oodml.lisp
index aebadfa27b31346c0e1294f190cd7b669eb991c0..85730dccf7d7f2eedf870992d567bf6a704a2fc4 100644 (file)
--- a/sql/oodml.lisp
+++ b/sql/oodml.lisp
@@ -130,7 +130,7 @@
        (dbtype (specified-type slotdef)))
     (typecase dbwriter
       (string (format nil dbwriter val))
-      ((or symbol function) (apply dbwriter (list val)))
+      ((and (or symbol function) (not null)) (apply dbwriter (list val)))
       (t
        (database-output-sql-as-type
        (typecase dbtype