diff --git a/test/asdf-pathname-test.script b/test/asdf-pathname-test.script
index 039d1ae290ab5a9a7afa10c62913d917b26c5575..f6ba9cde7e54307f386fe4194fa03fc9be094bf2 100644
--- a/test/asdf-pathname-test.script
+++ b/test/asdf-pathname-test.script
@@ -473,5 +473,5 @@
 (progn
   (DBG "Checking CMUCL user-homedir-pathname issue.")
   (assert (pathname-match-p
-	   (uiop/common-lisp:user-homedir-pathname)
-	   (getenv-pathname "HOME"))))
+           (uiop/common-lisp:user-homedir-pathname)
+           (getenv-pathname "HOME" :want-directory t))))