From: espen <espen>
Date: Thu, 20 Mar 2008 16:20:53 +0000 (+0000)
Subject: Fix for CLISP
X-Git-Url: https://git.distorted.org.uk/~mdw/clg/commitdiff_plain/b5ec56fe81e8c66ce3cb326d948a762c4b578175

Fix for CLISP
---

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)))))