Mon Feb 8 18:04:52 CET 2010 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Load qt.webkit, .uitools & .phonon optionaly.
diff -rN -u old-qt.examples/cl-smoke.qt.examples.asd new-qt.examples/cl-smoke.qt.examples.asd
--- old-qt.examples/cl-smoke.qt.examples.asd 2014-10-30 06:59:36.000000000 +0100
+++ new-qt.examples/cl-smoke.qt.examples.asd 2014-10-30 06:59:36.000000000 +0100
@@ -1,11 +1,17 @@
+;; :weakly-depends-on loaded the system to late to use #+feature for
+;; components; thus we load them earlyer.
+(dolist (system '(:cl-smoke.qt.webkit :cl-smoke.qt.uitools
+ :cl-smoke.qt.phonon))
+ (when (asdf:find-system system nil)
+ (asdf:oos 'asdf:load-op system)))
+
(defsystem :cl-smoke.qt.examples
:name :cl-smoke.qt.examples
:version (0 0 1)
:author "Tobias Rautenkranz"
:license "X11 & GPL"
:description "Qt examples."
- :depends-on (:cl-smoke.qt.gui :cl-smoke.qt.webkit :cl-smoke.qt.uitools
- :cl-smoke.qt.phonon)
+ :depends-on (:cl-smoke.qt.gui)
;;:cl-opengl :cl-glu :cl-smoke.qt.opengl)
:components
@@ -13,13 +19,16 @@
:components
((:file "package")
(:file "hello-world" :depends-on ("package"))
+ #+qt.phonon
(:file "video" :depends-on ("package"))
(:file "hello-world-quit" :depends-on ("package"))
(:file "i18n-hello-world" :depends-on ("package"))
(:file "tick-tack-toe" :depends-on ("package"))
(:file "launcher" :depends-on ("package"))
+ #+qt.uitools
(:file "ui" :depends-on ("package"))
(:file "repl" :depends-on ("package"))
+ #+qt.webkit
(:file "class-browser" :depends-on ("package"))
(:module "qt"
:depends-on ("package")
diff -rN -u old-qt.examples/src/package.lisp new-qt.examples/src/package.lisp
--- old-qt.examples/src/package.lisp 2014-10-30 06:59:36.000000000 +0100
+++ new-qt.examples/src/package.lisp 2014-10-30 06:59:36.000000000 +0100
@@ -8,10 +8,12 @@
#:hello-world-quit
#:hello-world-gc
+ #+qt.webkit
#:class-browser
#:tick-tack-toe
#:repl
+ #+qt.phonon
#:play-video
;;#:origami
@@ -20,6 +22,7 @@
#:analog-clock
#:colliding-mice
+ #+qt.uitools
#:load-ui-file))
(in-package #:qt.examples)