blob: 5b1fb274b292628ec1d1f26efc5b329a3b794ebf (
plain)
1
2
3
4
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) ":"))))))))
|
