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
87 :mewa
;the superclass of all mewa-presentations
92 :set-default-attributes
95 :perform-set-attributes
97 :perform-set-attribute-properties
99 ;; presentation objects
100 :mewa-object-presentation
101 :mewa-one-line-presentation
102 :mewa-list-presentation
105 :instance-is-stored-p
107 ;;;; Meta Model Exports))
108 :def-view-class
/table