[elephant-cvs] CVS elephant/src/db-clsql

[ieslick]

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."))