From 38d61f3c3dd2cf2135bb54bb9854ae562e380623 Mon Sep 17 00:00:00 2001
From: "Robert P. Goldman" <rpgoldman@sift.net>
Date: Mon, 27 Jun 2016 12:41:33 -0500
Subject: [PATCH] Fix pathname for loading asdf-encodings.

Looks like this didn't get updated after we installed the systems in the
ext/ subdirectory of the asdf-directory.
---
 test/test-encodings.script | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/test-encodings.script b/test/test-encodings.script
index 795a6afc1..04fb418dc 100644
--- a/test/test-encodings.script
+++ b/test/test-encodings.script
@@ -1,5 +1,5 @@
 ;;; -*- Lisp -*-
-
+(in-package :asdf-test)
 (defparameter *lambda-string* nil)
 
 (defun string-char-codes (s)
@@ -66,7 +66,7 @@
       (list *asdf-directory* ;; be sure that *OUR* asdf is first of any possible ASDF
             *uiop-directory* ;; be sure that ouir uiop is there, too.
             ;; try finding asdf-encodings it right next to asdf.
-            (subpathname *asdf-directory* "../asdf-encodings/")))
+            (subpathname *asdf-directory* "ext/asdf-encodings/")))
 (unless (find-system :asdf-encodings nil)
   ;; try harder by enabling the user's source-registry
   (initialize-source-registry ""))
-- 
GitLab