I'm playing with the toggle-widget that teddy made here:
http://teddyb.org/rlp/tiki-index.php?page=Learning+About+Weblocks#Making_A_Hiding_Widget
and I made a make-toggle-page function like this:
=======================================
(defun make-toggle-page ()
(hunchentoot:log-message :info
"make-toggle-page")
(make-instance 'composite :widgets
(list
(make-instance 'flash :messages
(list
(hunchentoot:session-cookie-value)
"duh!"))
(lambda ()
(let ((tw (make-instance 'toggle-widget :showp t
:data "Test data."))))))))
Here's my init-session:
========================================
(defun init-user-session (comp)
(setf (composite-widgets comp)
(make-main-page)))
and finally, my make-main-page:
=========================================
(defun make-main-page ()
(make-instance 'composite :widgets
(list
(make-navigation 'main-menu
'blah "nothing"
'toggle (make-toggle-page)
'test "blah"))))
The navigation widget renders like it should, and when I go to the
toggle page, I get nothing at all. Nada. Upon inspection of the
rendered html, I found that the root composite widget contains another
composite (id=0), which contains only the navigation widget, and
that's it. The toggle-widget is totally lost in the ether somewhere.
I'm not sure what's going on, because the render-widget-body method
that teddy wrote isn't being invoked either.
Any suggestions?
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
