I found that wrapping (call-next-method) inside (with-html-form) is the cause of the problem. Is there any way I could keep the dataform rendering inside the custom with-html-form ?
On Mar 28, 1:37 pm, radisb <[email protected]> wrote: > 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.
