[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