Sun Jun 21 11:29:25 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>

* *SMOKE-MODULE* must be passed instead of *QT-SMOKE*.

--- old-qt.gui/src/qstring.lisp 2014-10-30 07:46:33.000000000 +0100

+++ new-qt.gui/src/qstring.lisp 2014-10-30 07:46:33.000000000 +0100

@@ -38,7 +38,7 @@

(make-instance 'qstring))

(smoke:eval-startup (:compile-toplevel :execute)

-(let ((method (smoke::make-smoke-method (find-class 'qt:byte-array)

+ (let ((method (smoke::make-smoke-method-from-name (find-class 'qt:byte-array)

"data")))

(defmethod cxx:data ((array qt:byte-array))

(values ;; Discarge second return value (length of string)