* defsystem :clouseau: avoid pathname directory namestrings in file component names; reworking to be more portable.
Index: mcclim.asd =================================================================== RCS file: /project/mcclim/cvsroot/mcclim/mcclim.asd,v retrieving revision 1.23 diff -u -u -r1.23 mcclim.asd --- mcclim.asd 3 Jul 2006 04:58:41 -0000 1.23 +++ mcclim.asd 18 Oct 2006 00:13:54 -0000 @@ -417,9 +418,12 @@ :depends-on (:mcclim) :serial t :components - ((:file "Apps/Inspector/package") - (:file "Apps/Inspector/disassembly") - (:file "Apps/Inspector/inspector"))) + ((:module "Apps/Inspector" + :pathname #.(make-pathname :directory '(:relative "Apps" "Inspector")) + :components + ((:file "package") + (:file "disassembly") + (:file "inspector")))))
(defmethod perform :after ((op load-op) (c (eql (find-system :clim)))) (pushnew :clim *features*)