From: espen <espen>
Date: Wed, 2 Jan 2008 15:55:06 +0000 (+0000)
Subject: Using ASDF to set up logical pathname translation for clg
X-Git-Tag: clg-0-93~27
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/commitdiff_plain/2e26d08e01ef71edea42ee32139aed916a0a4833

Using ASDF to set up logical pathname translation for clg
---

diff --git a/tools/clg-tools.asd b/tools/clg-tools.asd
index 6589163..21c2e0c 100644
--- a/tools/clg-tools.asd
+++ b/tools/clg-tools.asd
@@ -16,3 +16,10 @@
 	       (:file "config" :depends-on ("utils"))
 	       (:file "asdf-extensions" :depends-on ("utils"))
 	       (:file "autoexport" :depends-on ("asdf-extensions"))))
+
+
+
+;; For backward compatibility
+(setf
+ (logical-pathname-translations "clg")
+ `(("**;*.*.*" ,(make-pathname :directory (append (butlast (pathname-directory (asdf:component-pathname (asdf:find-system :clg-tools)))) (list :wild-inferiors))))))