From b5ec56fe81e8c66ce3cb326d948a762c4b578175 Mon Sep 17 00:00:00 2001 From: espen Date: Thu, 20 Mar 2008 16:20:53 +0000 Subject: [PATCH] Fix for CLISP --- tools/clg-tools.asd | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tools/clg-tools.asd b/tools/clg-tools.asd index a7a8291..d7787e0 100644 --- a/tools/clg-tools.asd +++ b/tools/clg-tools.asd @@ -22,4 +22,4 @@ ;; For backward compatibility (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))))) + `(("**;*.*.*" ,(make-pathname :directory (append (butlast (pathname-directory dir)) (list :wild-inferiors)) #+win32 :defaults #+win32 dir))))) -- 2.11.0