Re: the last expression in tools/clg-tools.asd

Espen S Johnsen <[email protected]> 19 Mar 2008 15:34:59 +0100

Newsgroups	gmane.lisp.clg.devel
Message-ID	<[email protected]>

Chisheng Huang <[email protected]> writes:

> Hi Espen,
> 
> Could you please replace the last expression in tools/clg-tools.asd
> with the following?
> 
> (let ((dir (asdf:component-pathname (asdf:find-system :clg-tools))))
>   (setf (logical-pathname-translations "clg")
>    `(("**;*.*.*" ,(make-pathname :directory (append (butlast (pathname-directory dir))
> 						    (list :wild-inferiors))
> 				 :defaults dir)))))

Thanks, should be fixed now.

-- 
Espen

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/