16 Feb
2006
16 Feb
'06
7:10 p.m.
Update of /project/cells-gtk/cvsroot/root/cells-gtk In directory common-lisp:/tmp/cvs-serv9254/root/cells-gtk
Modified Files: buttons.lisp Log Message: trivial
--- /project/cells-gtk/cvsroot/root/cells-gtk/buttons.lisp 2004/12/22 16:23:50 1.5 +++ /project/cells-gtk/cvsroot/root/cells-gtk/buttons.lisp 2006/02/16 18:10:10 1.6 @@ -85,7 +85,7 @@ :new-args (c? (and (upper self box) (list (if (eql (first (kids (fm-parent self))) self) - c-null + +c-null+ (id (first (kids (fm-parent self)))))))) :on-toggled (callback (widget event data) ;;(print (list :radio-button widget event data))