Sun Dec 13 13:47:57 CET 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>

* Support ASDF instead of Mudballs.

--- old-qt.examples/src/i18n-hello-world.lisp 2014-10-30 07:36:54.000000000 +0100

+++ new-qt.examples/src/i18n-hello-world.lisp 2014-10-30 07:36:54.000000000 +0100

@@ -8,12 +8,7 @@

(qt:with-app ()

;; ensures that the message catalogs are found regardless

;; of the current directory.

- (let ((source-path

- #+mudballs (directory-namestring

- (mb.sysdef:input-file

- (mb.sysdef:find-component :qt.examples "src"

- "i18n-hello-world")))

- #-mudballs *default-pathname-defaults*))

+ (let ((source-path *default-pathname-defaults*))

(qt:with-translator ("hello-world"

*default-pathname-defaults*

source-path)