[cells-gtk-cvs] CVS update: root/cells-gtk/drawing.lisp

Peter Denno pdenno at common-lisp.net
Tue Jan 3 19:03:33 UTC 2006


Update of /project/cells-gtk/cvsroot/root/cells-gtk
In directory common-lisp.net:/tmp/cvs-serv30407/root/cells-gtk

Modified Files:
	drawing.lisp 
Log Message:
trivial
Date: Tue Jan  3 20:03:33 2006
Author: pdenno

Index: root/cells-gtk/drawing.lisp
diff -u root/cells-gtk/drawing.lisp:1.2 root/cells-gtk/drawing.lisp:1.3
--- root/cells-gtk/drawing.lisp:1.2	Fri Nov  4 16:02:05 2005
+++ root/cells-gtk/drawing.lisp	Tue Jan  3 20:03:33 2006
@@ -56,7 +56,6 @@
 	       (gdk-draw-drawable cgtk::*window* cgtk::*gcontext* drawable 0 0 dx dy -1 -1)))))
   0)
 
-;;; data is not used, AFAIK. 
 (defun gtk-drawing-set-handlers (widget data)
   (gtk-signal-connect-swap widget "button-press-event"
 			   (ffx:ff-register-callable 'drawing-button-events-handler)
@@ -70,7 +69,6 @@
   (gtk-signal-connect-swap widget "expose-event"
 			   (ffx:ff-register-callable 'drawing-expose-event-handler)
 			   :data data))
-
 (export '(gtk-drawing-set-handlers))
 
 ;;;============================================================================




More information about the Cells-gtk-cvs mailing list