changeset 40229:618f0d7df7a0

(uniquify-get-proposed-name): Fix (.. "usr" "/usr" 0).
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 23 Oct 2001 22:01:08 +0000
parents afee33bfd42a
children 4f4fa18e6655
files lisp/uniquify.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/uniquify.el	Tue Oct 23 18:55:49 2001 +0000
+++ b/lisp/uniquify.el	Tue Oct 23 22:01:08 2001 +0000
@@ -279,7 +279,7 @@
 		file)
 	      extra-string)))
     (when (zerop n)
-      (if (and filename
+      (if (and filename extra-string
 	       (setq filename (file-name-directory filename))
 	       (equal filename
 		      (file-name-directory (directory-file-name filename))))