I am trying to make a simple prototype "company finder" widget by
subclassing dataform. I want to present a simple text-input which the
user will fill with a company id and then the company will get
rendered. the code i think explains better what i want to do:
(defwidget company-finder (dataform)())
(defmethod render-widget-body ((obj company-finder) &rest args)
(with-html-form
(:post (lambda (&key company-id &allow-other-keys)
(setf (slot-value obj 'data)
(yaacrm::company company-id))))
(:input :type "text" :name "company-id")
(:input :type "submit" :value "Display company info")
(when (slot-value obj 'data)
(call-next-method))))
The widget correctly displays the input field and correctly renders
the company data with the view i have supplied. The problem is that if
i click on the modify link and then cancel, the dataform never returns
back to data ui-state.
I took a look in render-dataform-form method and it seems like it does
not get called. Any hints as to what could i do wrong.
--
You received this message because you are subscribed to the Google Groups
"weblocks" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to
[email protected].
For more options, visit this group at
http://groups.google.com/group/weblocks?hl=en.
