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)))