septeql

commit 6a90313924f6ff07842a23a9b5b851bee8f1226d
parent 5b8a4db4b6a3eee871965c342121080cecdcda0d
Author: septeql <septeql@telent.net>
Date:   Mon, 13 Jul 2009 12:07:35 +0000

handle keywords in data columns as strings
Diffstat:
M
septeql.lisp
 | 
1
+

1 file changed, 1 insertion(+), 0 deletions(-)
diff --git a/septeql.lisp b/septeql.lisp
@@ -47,6 +47,7 @@ interpolated into a SQL statement as a string literal"
     (real (format nil "~S" (coerce expr 'single-float)))
     (null "NULL")
     (boolean "TRUE")
+    (keyword (lisp-to-sql-string (string expr)))
     (symbol (lisp-to-sql-name expr))
     (cons 
      (destructuring-bind (op &rest args) expr