From: Glenn Morris <rgm@gnu.org>
Date: Wed, 2 Dec 2009 03:00:41 +0000 (+0000)
Subject: Andreas Politz  <politza at fh-trier.de>  (tiny change)
X-Git-Tag: emacs-pretest-23.1.90~127
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b2d5f31abf3d04628c9fe858fd80592e4f649097;p=emacs.git

Andreas Politz  <politza at fh-trier.de>  (tiny change)

(ido-file-internal): Handle filenames at point that do not have a
directory part.  (Bug#5049)
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0fe7ef21efc..6b9349a2fbd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-12-02  Andreas Politz  <politza@fh-trier.de>  (tiny change)
+
+	* ido.el (ido-file-internal): Handle filenames at point that do
+	not have a directory part.  (Bug#5049)
+
 2009-12-02  Juanma Barranquero  <lekktu@gmail.com>
 
 	* mpc.el (mpc-intersection, mpc-host, mpc-songs-playlist)
diff --git a/lisp/ido.el b/lisp/ido.el
index 7317540db32..ded7cbbfb4d 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2288,7 +2288,7 @@ If cursor is not at the end of the user input, move to end of input."
 			      (ffap-guesser)
 			    (ffap-string-at-point))))
 	       (not (string-match "^http:/" fn))
-	       (setq d (file-name-directory fn))
+	       (setq d (file-name-directory (expand-file-name fn)))
 	       (file-directory-p d))
 	  (setq ido-current-directory d)
 	  (setq initial (file-name-nondirectory fn))))))