Skip to content
Snippets Groups Projects
Commit 56e35f5d authored by Raymond Toy's avatar Raymond Toy
Browse files

Use truename of *load-pathname*.

parent 7bb20e4c
No related branches found
No related tags found
No related merge requests found
...@@ -29,7 +29,7 @@ ...@@ -29,7 +29,7 @@
(setf lisp-unit:*print-failures* t) (setf lisp-unit:*print-failures* t)
(setf lisp-unit:*print-errors* t) (setf lisp-unit:*print-errors* t)
(defvar *load-path* *load-pathname*) (defvar *load-path* (truename *load-pathname*))
(defvar *test-files* (defvar *test-files*
nil) nil)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment