changeset 81504:d0019b54de1f

(ido-find-file-in-dir): Use `file-name-as-directory'.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 20 Jun 2007 15:12:01 +0000
parents ab7180b32a2e
children 6ba0990e50fb
files lisp/ido.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ido.el	Wed Jun 20 14:25:54 2007 +0000
+++ b/lisp/ido.el	Wed Jun 20 15:12:01 2007 +0000
@@ -3994,8 +3994,7 @@
 (defun ido-find-file-in-dir (dir)
   "Switch to another file starting from DIR."
   (interactive "DDir: ")
-  (if (not (equal (substring dir -1) "/"))
-      (setq dir (concat dir "/")))
+  (setq dir (file-name-as-directory dir))
   (ido-file-internal ido-default-file-method nil dir nil nil nil 'ignore))
 
 ;;;###autoload