Set package for smoke module
Thu Jun 11 21:13:13 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* 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 05:26:57.000000000 +0200
+++ new-kde.ui/src/application.lisp 2014-10-06 05:26:57.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 05:26:57.000000000 +0200
+++ new-kde.ui/src/kde.lisp 2014-10-06 05:26:57.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"))