Mercurial > emacs
changeset 4216:6f940dcec978
(parse-colon-path): Really make nil, not ".", for empty path element.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 22 Jul 1993 05:34:53 +0000 |
parents | ccb1fb62bba6 |
children | 997e8a52f9fd |
files | lisp/files.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Wed Jul 21 22:37:55 1993 +0000 +++ b/lisp/files.el Thu Jul 22 05:34:53 1993 +0000 @@ -257,9 +257,9 @@ (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)))