HCoop
/
clinton
/
lisp-on-lines.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1da9fd4
)
docstring for view-class-metadata
author
Drew Crampsie
<drewc@tech.coop>
Mon, 4 Jul 2005 07:57:18 +0000
(
00:57
-0700)
committer
Drew Crampsie
<drewc@tech.coop>
Mon, 4 Jul 2005 07:57:18 +0000
(
00:57
-0700)
darcs-hash:
20050704075718
-5417e-
e7b9848b767c6c765b80622c6e16425ee81d968c
.gz
src/meta-model.lisp
patch
|
blob
|
blame
|
history
diff --git
a/src/meta-model.lisp
b/src/meta-model.lisp
index
8705a68
..
2fbe4b5
100644
(file)
--- a/
src/meta-model.lisp
+++ b/
src/meta-model.lisp
@@
-55,6
+55,9
@@
(class-name (class-of (meta-model.instance model))))
(defmethod view-class-metadata ((model t))
+ "
+This is what meta-model.metadata used to be called,
+most of the below functions expect this method to exist"
(meta-model.metadata model))
(defun list-item-helper (type view &key (ret-fun #'car))