Oh, and here's login-maybe, in case it helps, though I think I just
copied that from some tutorial:

(defwidget login-maybe (login)
  ((child-widget :accessor login-maybe-child-widget
                 :initarg :child-widget)
   (real-child-widget)
   (view :accessor login-view
         :initform 'login-view
         :initarg :view)))

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