Update of /project/elephant/cvsroot/elephant/src/db-clsql In directory clnet:/tmp/cvs-serv9966/src/db-clsql
Modified Files: sql-collections.lisp Log Message: Further lispworks tweaks; fix bug in wipe-class-indexing
--- /project/elephant/cvsroot/elephant/src/db-clsql/sql-collections.lisp 2007/02/26 19:12:18 1.11 +++ /project/elephant/cvsroot/elephant/src/db-clsql/sql-collections.lisp 2007/02/26 19:55:11 1.12 @@ -298,9 +298,7 @@
;; Secondary Cursors (defclass sql-secondary-cursor (sql-cursor) - ( - (dup-number :accessor dp-nmbr :initarg :dup-number :initform 0 :type integer) - ) + ((dup-number :accessor dp-nmbr :initarg :dup-number :initform 0 :type integer)) (:documentation "Cursor for traversing bdb secondary indices."))