X-Git-Url: https://git.hcoop.net/clinton/lisp-on-lines.git/blobdiff_plain/579597e310dfac262d629aade17f86c3d6b80da4..88dedfa8458d24bfc15eb6cbe62d472582ee8a7b:/src/packages.lisp diff --git a/src/packages.lisp b/src/packages.lisp index 8c971ce..267ca22 100644 --- a/src/packages.lisp +++ b/src/packages.lisp @@ -1,5 +1,5 @@ (defpackage :meta-model - (:use :common-lisp ) + (:use :common-lisp :clsql) (:export :meta-model-class :meta-model.base-type @@ -30,5 +30,31 @@ :find-default-value :explode-foreign-key :list-has-many - :list-many-to-many)) + :list-many-to-many + :sync-instance + :explode-has-many)) + +(defpackage :mewa + (:use :ucw :common-lisp) + (:export + :mewa + :mewa-object-presentation + :mewa-one-line-presentation + :find-attribute + :set-default-attributes + :make-presentation + :call-presentation + :label + :set-attribute + :find-class-attributes + :default-attributes + :ok + :edit-instance + :save-instance + :cancel-save-instance + :global-properties)) + + +(defpackage :lisp-on-lines + (:use :mewa :meta-model :common-lisp :it.bese.ucw)) \ No newline at end of file