Wed Jul 1 12:58:06 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>

* Break API compatibility for qt:with-app and qt:exec & spellcheck

--- old-qt.gui/src/signal-slot/signal.lisp 2014-10-30 07:46:18.000000000 +0100

+++ new-qt.gui/src/signal-slot/signal.lisp 2014-10-30 07:46:18.000000000 +0100

@@ -1,5 +1,4 @@

(in-package :cl-smoke.qt-impl)

-(declaim (optimize (debug 3)))

(defclass qsignal-mixin ()

((signal-object :accessor signal-object

@@ -54,8 +53,8 @@

(defun find-slot-id (receiver slot)

"Returns the ID of RECEIVER from SLOT."

- ;; For efficency assume that SLOT is normalized and fallback

- ;; to normalzing when not. (Just like Qt does.)

+ ;; For efficiency assume that SLOT is normalized and fallback

+ ;; to normalizing when not. (Just like Qt does.)

(let ((id (cxx:index-of-slot (cxx:meta-object receiver)

slot)))

(when (< id 0)