Hello,
I wrote the following code:
(defun init-user-session (comp)
(setf (widget-children comp)
(make-navigation 'main-menu
(list "First" (make-first) "first")
(list "Second" (make-widget 2) "second"))))
(defun make-first ()
(let ((w (make-instance 'widget)))
(setf (widget-children w)
(list (make-widget 1)
(lambda ()
(render-link (lambda (&rest args)
(declare (ignore args))
(with-flow w
(yield (make-widget 3))))
"Third"))))
w))
I use the back button on the second widget, then click on the action
link and see the second widget again. I would like to see a third
widget. What am I missing?
Thanks,
Tim
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
