Skip to content
Snippets Groups Projects
Commit 8c7e32e8 authored by Robert Goldman's avatar Robert Goldman
Browse files

Fix funcall in IN-USER-CONFIGURATION-DIRECTORY

parent 10d3b051
No related branches found
No related tags found
No related merge requests found
......@@ -64,7 +64,7 @@ first element of DIRS that exists. DEPRECATED."
(defun in-user-configuration-directory (x &key (direction :input))
"Return the file named X in the user configuration directory for common-lisp.
DEPRECATED."
(xdg-config-pathname "common-lisp" x direction))
(xdg-config-pathname (format nil "common-lisp/~a/" x) direction))
(defun in-system-configuration-directory (x &key (direction :input))
"Return the pathname for the file named X under the system configuration directory
for common-lisp. DEPRECATED."
......
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