Commit aca81698 authored by Robert Goldman's avatar Robert Goldman Committed by Elias Pipping

Fix test bug.

parent d3768208
......@@ -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))))
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment