Where should you keep the data in a celtk app. I tried doing the following...
(defmodel app (window) ((my-model :initform nil :initarg :model :accessor my-model)) (:default-initargs :kids (c? (the-kids (mk-row (:packing (c?pack-self)) (mk-popup-menubutton :id :view-selector :initial-value (c? (first (^entry-values))) :entry-values (c? '(codelists items item-groups forms events))) (mk-text-widget :id :display :value (c? (if *odm* (case (selection (fm^ :view-selector)) (codelists (codelists *odm*)) (items (items *odm*)) (t (xml *odm*)))))))))))
...but I couldn't work out how to access my-model from the text widget's (c? ...). What you see above is what I changed it to in order to make it access the global *odm* variable which is elsewhere set to be a normal cells instance. Is there a way to keep it all in the app? I'd like to make it so that my-model is set by the result of a file-open dialog.
Cheers, Andy