On Jul 14, 8:48 am, "Leslie P. Polzer" <[email protected]>
wrote:
> On Tue, Jul 13, 2010 at 11:00:12PM -0700, szabolcs.szucs wrote:
>> Sure.. : D
>> [...]
>
> Ah, yes. Code will help. :)
>
> I was suggesting the following:
>
> (defmethod view-field-hide-p ((field data-view-field))
>   (let ((value (call-next-method)))
>     (if (functionp value)
>       (funcall value *object*)
>       value)))
> [...]
> is to bind *object* dynamically in the rendering pipeline
> so we can refer to it here.
>

What do you think about this solution? (I'm really interested,
especially regarding threads and stuff.. Actually it seems to work..)

(defvar *object*)

(defwidget dyna-dataform (dataform)
  ())

(defmethod render-dataform ((obj dyna-dataform) data &rest args)
  (declare (ignore args))
  (let ((*object* data))
    (call-next-method)))

Later I use dyna-dataform instead of dataform...

\\
Szabolcs

-- 
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.

Reply via email to