Update of /project/elephant/cvsroot/elephant/src In directory common-lisp.net:/tmp/cvs-serv27847/src

Modified Files: classes.lisp Log Message: docstring fix

Date: Sun Sep 19 19:47:45 2004 Author: blee

Index: elephant/src/classes.lisp diff -u elephant/src/classes.lisp:1.10 elephant/src/classes.lisp:1.11 --- elephant/src/classes.lisp:1.10 Thu Sep 16 06:14:04 2004 +++ elephant/src/classes.lisp Sun Sep 19 19:47:44 2004 @@ -55,9 +55,10 @@

(defclass persistent-object (persistent) ((%persistent-slots :transient t)) - (:documentation "Superclass of all user-defined persistent -classes. To make some slots not persisted, use the -:transient flag.") + (:documentation +"Superclass of all user-defined persistent classes. This is +automatically inherited if you use the persistent-metaclass +metaclass.") (:metaclass persistent-metaclass))

(defmethod shared-initialize :around ((class persistent-metaclass) slot-names &rest args &key direct-superclasses)