[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