fix ros script installation directory on windows

This commit is contained in:
SANO,Masatoshi 2026-04-11 00:57:47 +09:00
parent aa261f4e46
commit 6c010f97d0

View file

@ -175,8 +175,8 @@ have the latest asdf, and this file has a workaround for this.
(cond (cond
(is-quicklisp-already-available (is-quicklisp-already-available
(unless (equal (opt "quicklisp") (unless (equal (ignore-errors (truename (pathname (opt "quicklisp"))))
(namestring (symbol-value (read-from-string "ql:*quicklisp-home*")))) (ignore-errors (truename (symbol-value (read-from-string "ql:*quicklisp-home*")))))
(setf *local-project-directories* (setf *local-project-directories*
(copy-list (copy-list
(symbol-value (read-from-string "ql:*local-project-directories*"))))) (symbol-value (read-from-string "ql:*local-project-directories*")))))