[mcclim-cvs] CVS update: mcclim/Examples/fire.lisp

[Andy Hefner]

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