Fri Apr 17 17:29:23 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>

* Use C++ style overload resolution

--- old-qt.examples/src/launcher.lisp 2014-10-30 07:39:03.000000000 +0100

+++ new-qt.examples/src/launcher.lisp 2014-10-30 07:39:04.000000000 +0100

@@ -11,8 +11,8 @@

(let ((button (make-instance 'qt:push-button

:args (list (or (documentation function 'function)

(format nil "~A" function))))))

- (qt:connect-function button "clicked()"

- #'(lambda () (funcall function)))

+ (qt:connect (qt:get-signal button "clicked()")

+ #'(lambda () (funcall function)))

button))