Commit 79ec789a authored by Francois-Rene Rideau's avatar Francois-Rene Rideau Committed by Elias Pipping
Browse files

asdf-pathname-test: use assert-pathname-equal

parent 9ba454c4

test/asdf-pathname-test.script

+3 −3
Original line number Diff line number Diff line
@@ -473,6 +473,6 @@ 
#+os-unix

(progn

  (DBG "Checking CMUCL user-homedir-pathname issue.")

  (assert (pathname-equal

  (assert-pathname-equal

   (uiop/common-lisp:user-homedir-pathname)

           (getenv-pathname "HOME" :want-directory t))))
 
   (getenv-pathname "HOME" :want-directory t)))