summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
ab37892)
* sql/metaclasses.lisp: Remove usused saved-initargs
+31 Dec 2006 Kevin Rosenberg <kevin@rosenberg.net>
+ * sql/metaclasses.lisp: Remove usused saved-initargs
+
30 Dec 2006 Kevin Rosenberg <kevin@rosenberg.net>
* Version 3.8.0: BACKWARD INCOMPATABLE CHANGE!
* db-postgresql/postgresql-{api,loader,sql,package}.lisp:
30 Dec 2006 Kevin Rosenberg <kevin@rosenberg.net>
* Version 3.8.0: BACKWARD INCOMPATABLE CHANGE!
* db-postgresql/postgresql-{api,loader,sql,package}.lisp:
(defmethod initialize-instance :around ((obj view-class-direct-slot-definition)
&rest initargs)
(defmethod initialize-instance :around ((obj view-class-direct-slot-definition)
&rest initargs)
- (do* ((saved-initargs initargs)
- (parsed (list obj))
+ (do* ((parsed (list obj))
(name (first initargs) (first initargs))
(val (second initargs) (second initargs))
(type nil)
(name (first initargs) (first initargs))
(val (second initargs) (second initargs))
(type nil)