src/launcher.lisp
Wed Jul 1 13:01:24 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Use new qt:with-app.
--- old-qt.examples/src/launcher.lisp 2014-10-08 12:49:15.000000000 +0200
+++ new-qt.examples/src/launcher.lisp 2014-10-08 12:49:15.000000000 +0200
@@ -26,7 +26,7 @@
(defun launcher ()
"Launch the Qt examples"
- (qt:with-app
+ (qt:with-app ()
(let ((launcher (make-instance 'launcher)))
(cxx:show launcher)
- (qt:exec launcher))))
+ (qt:exec))))