From: Ryan Davis <ryan@acceleration.net>
Date: Thu, 30 Aug 2012 20:18:53 +0000 (-0400)
Subject: ensure the sqlite database name is a string (and not a pathname)
X-Git-Tag: v6.3.0~5
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=3f5f1a3f373c89940d4407f92ed58b2f093d9698

ensure the sqlite database name is a string (and not a pathname)
---

diff --git a/db-sqlite3/sqlite3-sql.lisp b/db-sqlite3/sqlite3-sql.lisp
index 927716a..63e48ec 100644
--- a/db-sqlite3/sqlite3-sql.lisp
+++ b/db-sqlite3/sqlite3-sql.lisp
@@ -31,7 +31,7 @@
 (defmethod database-name-from-spec (connection-spec
                                     (database-type (eql :sqlite3)))
   (check-sqlite3-connection-spec connection-spec)
-  (first connection-spec))
+  (princ-to-string (first connection-spec)))
 
 (defmethod database-connect (connection-spec (database-type (eql :sqlite3)))
   (check-sqlite3-connection-spec connection-spec)