* lisp/cus-start.el (exec-path): Handle nil elements. (Bug#24471)
This commit is contained in:
parent
55ebb708cf
commit
b73f4668ab
1 changed files with 3 additions and 1 deletions
|
@ -173,7 +173,9 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
|
||||||
(directory :format "%v")))
|
(directory :format "%v")))
|
||||||
nil
|
nil
|
||||||
:standard
|
:standard
|
||||||
(mapcar 'directory-file-name
|
(mapcar (lambda (f)
|
||||||
|
(if f (directory-file-name f)
|
||||||
|
"."))
|
||||||
(append (parse-colon-path (getenv "PATH"))
|
(append (parse-colon-path (getenv "PATH"))
|
||||||
(list exec-directory))))
|
(list exec-directory))))
|
||||||
(exec-suffixes execute (repeat string))
|
(exec-suffixes execute (repeat string))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue