X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Fclasses.lisp;h=a829d3894cbe4aa8e0e4767d247a05071a087a6e;hb=5257515973703e60f7ad3eca63c9a1ea0409cdd1;hp=24bd71a1dd2be6f3da2aeb478f45bffeff66b814;hpb=1619f599a1e37dd30dfe7ab803374f5eed26544a;p=clsql.git

diff --git a/sql/classes.lisp b/sql/classes.lisp
index 24bd71a..a829d38 100644
--- a/sql/classes.lisp
+++ b/sql/classes.lisp
@@ -13,7 +13,7 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(in-package #:clsql)
+(in-package #:clsql-sys)
 
 (defvar +empty-string+ "''")
 
@@ -628,6 +628,7 @@ uninclusive, and the args from that keyword to the end."
   t)
 
 (defmethod output-sql ((query sql-object-query) database)
+  (declare (ignore database))
   (with-slots (objects)
       query
     (when objects