From dada11169da0082a3b3aade5a17984335c364ce6 Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <fare@tunes.org>
Date: Fri, 3 Dec 2010 16:21:53 -0500
Subject: [PATCH] 2.011.2: make some test pass with ECL. Apparently,
 :unspecific as pathname type isn't that well liked by ECL.

---
 asdf.asd                       | 2 +-
 asdf.lisp                      | 4 ++--
 doc/asdf.texinfo               | 2 +-
 test/test-configuration.script | 2 +-
 4 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/asdf.asd b/asdf.asd
index 317bffef..d8a63b8f 100644
--- a/asdf.asd
+++ b/asdf.asd
@@ -12,7 +12,7 @@
   :licence "MIT"
   :description "Another System Definition Facility"
   :long-description "ASDF builds Common Lisp software organized into defined systems."
-  :version "2.011.1"
+  :version "2.011.2"
   ;;:version #.(asdf:asdf-version) ; how do we make that the *described* ASDF's version rather than the *previously loaded* ASDF's version?
   :depends-on ()
   :components
diff --git a/asdf.lisp b/asdf.lisp
index 8c33a074..8a596d92 100644
--- a/asdf.lisp
+++ b/asdf.lisp
@@ -78,7 +78,7 @@
          ;; "2.345.6" would be a development version in the official upstream
          ;; "2.345.0.7" would be your local modification of an official release
          ;; "2.345.6.7" would be your local modification of a development version
-         (asdf-version "2.011.1")
+         (asdf-version "2.011.2")
          (existing-asdf (fboundp 'find-system))
          (existing-version *asdf-version*)
          (already-there (equal asdf-version existing-version)))
@@ -496,7 +496,7 @@ starting the separation from the end, e.g. when called with arguments
          ;; Giving :unspecific as argument to make-pathname is not portable.
          ;; See CLHS make-pathname and 19.2.2.2.3.
          ;; We only use it on implementations that support it.
-         (or #+(or ccl ecl gcl lispworks sbcl) :unspecific)))
+         (or #+(or ccl gcl lispworks sbcl) :unspecific)))
     (destructuring-bind (name &optional (type unspecific))
         (split-string filename :max 2 :separator ".")
       (if (equal name "")
diff --git a/doc/asdf.texinfo b/doc/asdf.texinfo
index ee6a1fc4..7d721276 100644
--- a/doc/asdf.texinfo
+++ b/doc/asdf.texinfo
@@ -1937,7 +1937,7 @@ contains the following:
 @end example
 
 Then when someone else (call her Y) checks out a copy of this
-repository, she need only add 
+repository, she need only add
 @example
 (:include "/path/to/my/checkout/directory/asdf.conf")
 @end example
diff --git a/test/test-configuration.script b/test/test-configuration.script
index 6533208e..b8a8b2bf 100644
--- a/test/test-configuration.script
+++ b/test/test-configuration.script
@@ -47,7 +47,7 @@
           "dir5/dir7/"                  ; foo5
           "dir8/"                       ; foo6
           "dir9/dira/"                  ; foo7 should be found because of :here :tree
-          "dir9/dira/dirc"              ; foo8 ditto
+          "dir9/dira/dirc/"              ; foo8 ditto
           "dir9/dirb/")                 ; foo9 should /not/ be found -- not under :here :tree
     :collect (under-test-directory dir)))
 
-- 
GitLab