Mon May 11 20:30:39 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>

* use (setf instead of setter methods.

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

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

@@ -22,7 +22,7 @@

(do-external-symbols (example :qt.examples)

(when (fboundp example)

(cxx:add-widget layout (make-launcer-button (symbol-function example)))))

- (cxx:set-layout launcher layout)))

+ (setf (cxx:layout launcher) layout)))

(defun launcher ()

"Launch the Qt examples"