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

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


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

Modified Files:
	textview.lisp 
Log Message:
Misplaced declare ignore makes clisp and cmucl error.
Date: Tue Jan  3 20:01:20 2006
Author: pdenno

Index: root/cells-gtk/textview.lisp
diff -u root/cells-gtk/textview.lisp:1.5 root/cells-gtk/textview.lisp:1.6
--- root/cells-gtk/textview.lisp:1.5	Sat Oct  8 16:31:24 2005
+++ root/cells-gtk/textview.lisp	Tue Jan  3 20:01:20 2006
@@ -71,7 +71,6 @@
 
 (ff-defun-callable :cdecl :void text-view-populate-popup-handler
   ((widget :pointer-void) (signal :pointer-void) (data :pointer-void))
-  (declare (ignorable signal data))
   (let ((popup-menu (gtk-adds-text-view-popup-menu widget)))
     (bwhen (text-view (gtk-object-find widget))
       (bwhen (cb (callback-recover text-view :populate-popup))




More information about the Cells-gtk-cvs mailing list