Did some work on searching, changed object presentation to specialise on each row...
[clinton/lisp-on-lines.git] / src / packages.lisp
CommitLineData
579597e3 1(defpackage :meta-model
292c806a 2 (:use :common-lisp :clsql)
579597e3 3 (:export
4 :meta-model-class
5 :meta-model.base-type
6 :meta-model.instance
7 :meta-model.metadata
8 :def-meta-model
9 :def-base-class
10 :%def-base-class
8e6e6b56 11
579597e3 12 :def-view-class/table
13 :def-view-class/meta
14 :view-class-metadata
15 :create-table-from-model
16 :list-slots
17 :list-slot-types
18 :slot-type
19 :display-slot
20 :list-joins
21 :list-join-attributes
22 :list-keys
23 :list-view-classes
24 :display-slot
25 :primary-key-p
26 :list-foreign-keys
27 :foreign-key-p
28 :explode-foreign-key
29 :find-join-class
30 :find-join-key
31 :find-default-value
32 :explode-foreign-key
33 :list-has-many
292c806a 34 :list-many-to-many
498061f6 35 :sync-instance
9d6c69fb
DC
36 :explode-has-many
37 :expr-ends-with
38 :expr-starts-with
39 :expr-contains
40 :expr-=
41 :expr-<
42 :expr->
43 :expr-and
44 :expr-or
45 :expr-not
dbeb1708 46 :select-instances))
579597e3 47
6d063a77 48
49(defpackage :mewa
50 (:use :ucw :common-lisp)
498061f6 51 (:export
52 :mewa
53 :mewa-object-presentation
9d6c69fb 54 :mewa-one-line-presentation
dbeb1708 55 :mewa-list-presentation
9d6c69fb 56 :mewa-presentation-search
498061f6 57 :find-attribute
7c3aade7 58 :set-default-attributes
498061f6 59 :make-presentation
60 :call-presentation
dbeb1708
DC
61 :label
62 :attributes
e8e743d7 63 :set-attribute
64 :perform-set-attributes
dbeb1708 65 :perform-set-attribute-properties
498061f6 66 :find-class-attributes
67 :default-attributes
68 :ok
69 :edit-instance
70 :save-instance
71 :cancel-save-instance
85281029 72 :ensure-instance-sync
569ad9e6 73 :instance-is-stored-p
85281029
DC
74 :global-properties
75 :search-expr
76 :search-query))
6d063a77 77
78(defpackage :lisp-on-lines
dbeb1708 79 (:use :mewa :meta-model :common-lisp :it.bese.ucw)
8e6e6b56 80 (:nicknames :lol)
dbeb1708
DC
81 (:export
82 ;;;; Mewa Exports
8e6e6b56 83 :mewa ;the superclass of all mewa-presentations
dbeb1708
DC
84 :make-presentation
85
86 ;;attributes
87 :attributes
88 :set-default-attributes
89 :set-attribute
90 :find-attribute
91 :perform-set-attributes
92 ;;
93 :perform-set-attribute-properties
94
95 ;; presentation objects
96 :mewa-object-presentation
97 :mewa-one-line-presentation
98 :mewa-list-presentation
569ad9e6
DC
99
100 ;; CRUD
101 :instance-is-stored-p
102
dbeb1708
DC
103 ;;;; Meta Model Exports))
104 :def-view-class/table
7c3aade7 105 :def-view-class/meta
8e6e6b56
DC
106 :list-slot-types
107 ))