Commit 2aabf24f6415ed119190787a2bc8e9e833378371

Thomas de Grivel 2018-03-05T15:09:01

Look in subdirectories for repo-asd.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
diff --git a/repo.lisp b/repo.lisp
index 69ae2d3..e040dc6 100644
--- a/repo.lisp
+++ b/repo.lisp
@@ -218,8 +218,11 @@
 
 (defmethod repo-asd ((repo repo) &optional
                                    (package (first (repo-packages repo))))
-  (str (translate-home (repo-local-dir repo)) "/"
-       (string-downcase package) ".asd"))
+  (namestring
+   (first
+    (directory
+     (str (translate-home (repo-local-dir repo)) "/**/"
+          (string-downcase package) ".asd")))))
 
 (defmethod repo-dir/name ((repo repo))
   (str (repo-dir repo) "/" (repo-name repo)))