![](https://secure.gravatar.com/avatar/9266b2578b15bce44a4b0e40b5fb85a5.jpg?s=120&d=mm&r=g)
10 Mar
2009
10 Mar
'09
9:21 p.m.
Hi again, The following triggers an incorrect error for me. Not a major bug since the third case provides a workaround. (defclass FOO () ((bar :col-type real)) (:metaclass dao-class) (:keys baz)) (dao-table-definition 'foo) ;; correct error. ;; redefine: (defclass FOO () ((bar :col-type real)) (:metaclass dao-class)) ;; incorrect error! ;; redefine: (defclass FOO () ((bar :col-type real)) (:metaclass dao-class) (:keys bar)) ;; works, then can run the second defclass successfully. -Luke