X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fobjects.lisp;h=627989b104c1da1b34f47b68f9ff7a4eb511ca08;hp=33aab570302cf7dc098cf48a1bfc2d469841b38d;hb=b43e20a168dae4ae9d176ebc0fbf18ea6e4517dc;hpb=a91ef336e5401ba5acbe0cf66447eeae7d4cad50

diff --git a/sql/objects.lisp b/sql/objects.lisp
index 33aab57..627989b 100644
--- a/sql/objects.lisp
+++ b/sql/objects.lisp
@@ -13,7 +13,7 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(in-package #:clsql-sys)
+(in-package #:clsql)
 
 (defclass standard-db-object ()
   ((view-database :initform nil :initarg :view-database :reader view-database
@@ -169,7 +169,7 @@ superclass of the newly-defined View Class."
     (defclass ,class ,supers ,slots 
       ,@(if (find :metaclass `,cl-options :key #'car)
 	    `,cl-options
-	    (cons '(:metaclass clsql-sys::standard-db-class) `,cl-options)))
+	    (cons '(:metaclass clsql::standard-db-class) `,cl-options)))
     (finalize-inheritance (find-class ',class))
     (find-class ',class)))