Update of /project/elephant/cvsroot/elephant/tests In directory clnet:/tmp/cvs-serv6244 Modified Files: testindexing.lisp Log Message: Syntax tweak in test --- /project/elephant/cvsroot/elephant/tests/testindexing.lisp 2006/04/26 21:41:25 1.17 +++ /project/elephant/cvsroot/elephant/tests/testindexing.lisp 2006/05/06 19:18:01 1.18 @@ -34,12 +34,11 @@ ((slot1 :initarg :slot1 :initform 1 :accessor slot1 :index t)) (:metaclass persistent-metaclass)) - (disable-class-indexing 'idx-one :errorp nil) (disable-class-indexing 'idx-one :errorp nil) (setf (find-class 'idx-one) nil) t) -t) + t) (deftest indexing-basic-trivial (progn