Update of /project/mcclim/cvsroot/mcclim/Examples In directory common-lisp.net:/tmp/cvs-serv15028
Modified Files: fire.lisp Log Message: Remove debugging code from (broken) fire example.
Date: Wed Feb 2 07:32:32 2005 Author: ahefner
Index: mcclim/Examples/fire.lisp diff -u mcclim/Examples/fire.lisp:1.4 mcclim/Examples/fire.lisp:1.5 --- mcclim/Examples/fire.lisp:1.4 Tue Feb 1 06:35:30 2005 +++ mcclim/Examples/fire.lisp Wed Feb 2 07:32:32 2005 @@ -52,7 +52,6 @@
(defmethod handle-event :after ((pane clim-internals::fire-pane) (event pointer-event)) (declare (ignorable event)) - (hef:debugf pane event) #+nil (let ((label (clim-internals::gadget-label (clim-internals::radio-box-current-selection (find-pane-named *application-frame* 'radio-box)))))