Commit | Line | Data |
---|---|---|
6d063a77 | 1 | (defpackage :lisp-on-lines |
38a016c7 | 2 | (:use :mewa :meta-model :common-lisp :it.bese.ucw :js :clsql) |
8e6e6b56 | 3 | (:nicknames :lol) |
dbeb1708 | 4 | (:export |
68a53dce | 5 | ;;;; LoL |
d5e996b3 DC |
6 | :define-view-for-table |
7 | :define-views-for-database | |
68a53dce | 8 | |
d5e996b3 DC |
9 | ;;;;a wrapper for calling make-presentation |
10 | :call-view | |
11 | :present-view | |
12 | :slot-view | |
13 | :present-slot-view | |
14 | :make-view | |
d2512426 DC |
15 | ;;;; Ajax |
16 | :auto-complete | |
17 | :call-auto-complete | |
68a53dce | 18 | |
dbeb1708 | 19 | ;;;; Mewa Exports |
8e6e6b56 | 20 | :mewa ;the superclass of all mewa-presentations |
dbeb1708 | 21 | :make-presentation |
68a53dce | 22 | :call-presentation |
d5e996b3 | 23 | |
dbeb1708 DC |
24 | ;;attributes |
25 | :attributes | |
d5e996b3 DC |
26 | :define-attributes |
27 | :with-default-attributes | |
dbeb1708 DC |
28 | :set-default-attributes |
29 | :set-attribute | |
30 | :find-attribute | |
31 | :perform-set-attributes | |
32 | ;; | |
33 | :perform-set-attribute-properties | |
fc3e754f | 34 | :define-attributes |
dbeb1708 DC |
35 | |
36 | ;; presentation objects | |
d5e996b3 DC |
37 | :present |
38 | :instance | |
dbeb1708 DC |
39 | :mewa-object-presentation |
40 | :mewa-one-line-presentation | |
41 | :mewa-list-presentation | |
569ad9e6 | 42 | |
fc3e754f DC |
43 | ;; SLOT presentations |
44 | :defslot-presentation | |
45 | :slot-name | |
46 | :mewa-relation-slot-presentation | |
47 | :has-many-slot-presentation | |
d5e996b3 | 48 | :present-slot |
569ad9e6 DC |
49 | ;; CRUD |
50 | :instance-is-stored-p | |
51 | ||
dbeb1708 | 52 | ;;;; Meta Model Exports)) |
5a4eea11 DC |
53 | :define-meta-model |
54 | :def-view-class-from-table | |
7c3aade7 | 55 | :def-view-class/meta |
8e6e6b56 DC |
56 | :list-slot-types |
57 | )) |