# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1182352321 0
# Node ID d0019b54de1f28e4f46c86b573450ac25b14ae77
# Parent  ab7180b32a2e0ddb6f0fff911b4bfccec5d1ca92
(ido-find-file-in-dir): Use `file-name-as-directory'.

diff -r ab7180b32a2e -r d0019b54de1f lisp/ido.el
--- 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