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 :perform-set-attributes
63 :perform-set-attribute-properties
64 :find-class-attributes
76 (defpackage :lisp-on-lines
77 (:use
:mewa
:meta-model
:common-lisp
:it.bese.ucw
:js
)
81 :initialize-lol-for-table
82 :initialize-lol-for-database
89 :mewa
;the superclass of all mewa-presentations
94 :set-default-attributes
97 :perform-set-attributes
99 :perform-set-attribute-properties
101 ;; presentation objects
102 :mewa-object-presentation
103 :mewa-one-line-presentation
104 :mewa-list-presentation
107 :instance-is-stored-p
109 ;;;; Meta Model Exports))
111 :def-view-class-from-table