Thu Jun 11 21:13:13 CEST 2009 Tobias Rautenkranz * Set package for smoke module diff -rN -u old-kde.ui/src/application.lisp new-kde.ui/src/application.lisp --- old-kde.ui/src/application.lisp 2014-10-06 06:11:56.000000000 +0200 +++ new-kde.ui/src/application.lisp 2014-10-06 06:11:56.000000000 +0200 @@ -48,7 +48,7 @@ (values (make-instance 'application) t)))) (defun kill-app () (qt:application.close-all-windows) - (setf qt::*widgets* nil) + (setf cl-smoke.qt-impl::*widgets* nil) ;; FIXME make it work without mem-faults (trivial-garbage:cancel-finalization (app)) (cxx:delete-later (app)) @@ -56,7 +56,7 @@ (setf (slot-value (app) 'pointer) (null-pointer)))) (defmacro with-app (about-data &body body) - `(qt::with-application ((ensure-app ,about-data) + `(cl-smoke.qt-impl::with-application ((ensure-app ,about-data) (kill-app)) ,@body)) diff -rN -u old-kde.ui/src/kde.lisp new-kde.ui/src/kde.lisp --- old-kde.ui/src/kde.lisp 2014-10-06 06:11:56.000000000 +0200 +++ new-kde.ui/src/kde.lisp 2014-10-06 06:11:56.000000000 +0200 @@ -27,7 +27,7 @@ (in-package :kde) -(smoke:define-smoke-module libsmokekde +(smoke:define-smoke-module :kde libsmokekde (*kde-smoke* "kde_Smoke") (init-kde-smoke "init_kde_Smoke"))