Commit | Line | Data |
---|---|---|
5071bbe1 DC |
1 | (defpackage :mewa |
2 | (:use :ucw :common-lisp :arnesi :iterate) | |
3 | (:export | |
4 | :mewa | |
5 | :editablep | |
d5e996b3 DC |
6 | |
7 | ;object presentations | |
8 | :present | |
9 | :foreign-key-slot-presentation | |
5071bbe1 DC |
10 | :mewa-object-presentation |
11 | :mewa-one-line-presentation | |
12 | :mewa-list-presentation | |
13 | :mewa-presentation-search | |
14 | ||
15 | ;;Slot Presentations | |
16 | :defslot-presentation | |
17 | :slot-presentation | |
18 | :mewa-slot-presentation | |
d5e996b3 DC |
19 | |
20 | :present-slot | |
21 | :presentation-slot-value | |
22 | ||
23 | ||
5071bbe1 DC |
24 | :mewa-relation-slot-presentation |
25 | :has-a-slot-presentation | |
26 | :has-a | |
27 | :has-many-slot-presentation | |
28 | :has-many | |
29 | :has-very-many-slot-presentation | |
30 | :has-very-many | |
31 | :slot-name | |
d5e996b3 DC |
32 | |
33 | ;attributes | |
fc3e754f | 34 | :define-attributes |
d5e996b3 DC |
35 | :with-default-attributes |
36 | :find-attribute | |
37 | :find-attribute-slot | |
5071bbe1 DC |
38 | :set-default-attributes |
39 | :make-presentation | |
40 | :call-presentation | |
41 | :label | |
42 | :attributes | |
43 | :set-attribute | |
44 | :set-attribute-properties | |
45 | :perform-set-attributes | |
46 | :perform-set-attribute-properties | |
47 | :find-class-attributes | |
48 | :default-attributes | |
49 | :ok | |
d5e996b3 | 50 | :instance |
5071bbe1 DC |
51 | :edit-instance |
52 | :save-instance | |
53 | :cancel-save-instance | |
54 | :ensure-instance-sync | |
55 | :instance-is-stored-p | |
56 | :global-properties | |
57 | :search-expr | |
58 | :search-query)) | |
59 |