Mon Feb 8 18:04:52 CET 2010 Tobias Rautenkranz * 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 07:35:43.000000000 +0100 +++ new-qt.examples/cl-smoke.qt.examples.asd 2014-10-30 07:35:43.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 07:35:43.000000000 +0100 +++ new-qt.examples/src/package.lisp 2014-10-30 07:35:43.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)