From 6eea812df480ec9dfff175e8910e32eb20658b8b Mon Sep 17 00:00:00 2001 From: Jason Gross Date: Sat, 7 Oct 2017 15:04:31 -0400 Subject: Fix .dir-locals.el to work on Windows Previously, it was splitting on : and adding extra paths with, e.g., c:/ --- .dir-locals.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to '.dir-locals.el') diff --git a/.dir-locals.el b/.dir-locals.el index 5b1fb274b..d7155993d 100644 --- a/.dir-locals.el +++ b/.dir-locals.el @@ -1,5 +1,5 @@ ((coq-mode . ((eval . (let* ((project-root (locate-dominating-file buffer-file-name "_CoqProject")) (coqprime-folder (expand-file-name "coqprime" project-root)) - (coq-path (split-string (or (getenv "COQPATH") "") ":" t))) - (unless (memql coqprime-folder coq-path) - (setenv "COQPATH" (mapconcat #'identity (cons coqprime-folder coq-path) ":")))))))) + (coq-path (split-string (or (getenv "COQPATH") "") path-separator t))) + (unless (member coqprime-folder coq-path) + (setenv "COQPATH" (mapconcat #'identity (cons coqprime-folder coq-path) path-separator)))))))) -- cgit v1.2.3