diff --git a/test/asdf-pathname-test.script b/test/asdf-pathname-test.script index 524643dff43372d7de0f92ae6b8c4744eca6d6ec..7ec902a7dd61b9415a2cafbd9d692650bac93e53 100644 --- a/test/asdf-pathname-test.script +++ b/test/asdf-pathname-test.script @@ -473,6 +473,6 @@ #+os-unix (progn (DBG "Checking CMUCL user-homedir-pathname issue.") - (assert (pathname-equal - (uiop/common-lisp:user-homedir-pathname) - (getenv-pathname "HOME" :want-directory t)))) + (assert-pathname-equal + (uiop/common-lisp:user-homedir-pathname) + (getenv-pathname "HOME" :want-directory t)))