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