Commit c52e4104 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(parse-colon-path): Really make nil, not ".", for empty path element.

parent 0a933d4b
......@@ -257,9 +257,9 @@ Not actually set up until the first time you you use it.")
(while (setq cd-colon (string-match ":" cd-path cd-start))
(setq cd-list
(nconc cd-list
(list (substitute-in-file-name
(if (= cd-start cd-colon)
"."
(list (if (= cd-start cd-colon)
nil
(substitute-in-file-name
(file-name-as-directory
(substring cd-path cd-start cd-colon)))))))
(setq cd-start (+ cd-colon 1)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment