r3613: *** empty log message ***
[hyperobject.git] / metaclass.lisp
index 2a632b50d766faba563699999eb0e6847fd6ca22..b43f7e52885b60962886fe5a3236a4015742eb61 100644 (file)
@@ -8,7 +8,7 @@
 ;;;; Date Started:  Apr 2000
 ;;;;
 ;;;;
-;;;; $Id: metaclass.lisp,v 1.3 2002/12/09 10:37:58 kevin Exp $
+;;;; $Id: metaclass.lisp,v 1.4 2002/12/13 05:44:19 kevin Exp $
 ;;;;
 ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
 ;;;;
@@ -21,7 +21,7 @@
 
   
 (defparameter *class-options*
-  '(:user-name :print-slots :description :version :sql-name)
+  '(:user-name :default-print-slots :description :version :sql-name)
   "List of class options for hyperobjects.")
 (defparameter *slot-options*
   '(:print-formatter :description :user-name