1 (defpackage :meta-model
2 (:use
:common-lisp
:clsql
:clsql-pg-introspect
)
3 (:shadow
:primary-key-p
)
10 :def-view-class-from-table
13 :create-table-from-model
48 (:use
:ucw
:common-lisp
)
51 :mewa-object-presentation
52 :mewa-one-line-presentation
53 :mewa-list-presentation
54 :mewa-presentation-search
56 :set-default-attributes
62 :set-attribute-properties
63 :perform-set-attributes
64 :perform-set-attribute-properties
65 :find-class-attributes
77 (defpackage :lisp-on-lines
78 (:use
:mewa
:meta-model
:common-lisp
:it.bese.ucw
:js
)
82 :initialize-lol-for-table
83 :initialize-lol-for-database
90 :mewa
;the superclass of all mewa-presentations
95 :set-default-attributes
98 :perform-set-attributes
100 :perform-set-attribute-properties
102 ;; presentation objects
103 :mewa-object-presentation
104 :mewa-one-line-presentation
105 :mewa-list-presentation
108 :instance-is-stored-p
110 ;;;; Meta Model Exports))
112 :def-view-class-from-table