From b3ff665b2abc18fafec9c2bedbccf8f2d94f3242 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 20 Apr 2015 17:40:32 -0400 Subject: [PATCH] * lisp/cus-start.el (exec-path): Set standard value, to avoid rogue. --- lisp/cus-start.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/cus-start.el b/lisp/cus-start.el index 29ef371669c..071aaa6850f 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -169,7 +169,12 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of (shell-file-name execute file) (exec-path execute (repeat (choice (const :tag "default directory" nil) - (directory :format "%v")))) + (directory :format "%v"))) + nil + :standard + (mapcar 'directory-file-name + (append (parse-colon-path (getenv "PATH")) + (list exec-directory)))) (exec-suffixes execute (repeat string)) ;; charset.c (charset-map-path installation -- 2.39.5