Fri Jul 24 15:40:52 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Remove unnecessary #'cxx:data calls.
diff -rN -u old-qt.gui/src/signal-slot/signal.lisp new-qt.gui/src/signal-slot/signal.lisp
--- old-qt.gui/src/signal-slot/signal.lisp 2014-10-30 07:00:44.000000000 +0100
+++ new-qt.gui/src/signal-slot/signal.lisp 2014-10-30 07:00:44.000000000 +0100
@@ -58,7 +58,7 @@
slot)))
(when (< id 0)
(setf id (cxx:index-of-slot (cxx:meta-object receiver)
- (cxx:data (qt:meta-object.normalized-signature slot)))))
+ (qt:meta-object.normalized-signature slot))))
(when (< id 0)
(error "No slot ~S for class ~S.
The valid slots are: ~{~<~%~T~0,75:;~A ~>~}"
diff -rN -u old-qt.gui/src/signal-slot/slot.lisp new-qt.gui/src/signal-slot/slot.lisp
--- old-qt.gui/src/signal-slot/slot.lisp 2014-10-30 07:00:44.000000000 +0100
+++ new-qt.gui/src/signal-slot/slot.lisp 2014-10-30 07:00:44.000000000 +0100
@@ -55,7 +55,7 @@
signal)))
(when (< id 0)
(setf id (cxx:index-of-signal (cxx:meta-object sender)
- (cxx:data (qt:meta-object.normalized-signature signal)))))
+ (qt:meta-object.normalized-signature signal))))
(when (< id 0)
(error "No signal ~S for class ~S."
signal (class-of sender)))