aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2009-12-02 03:00:41 +0000
committerGlenn Morris2009-12-02 03:00:41 +0000
commitb2d5f31abf3d04628c9fe858fd80592e4f649097 (patch)
tree75be13dcbde92fd4c761a644ee3049cf7ad448ce
parentc710ac3c08b7657f775b5d5f63bf98d3c71f2a5d (diff)
downloademacs-b2d5f31abf3d04628c9fe858fd80592e4f649097.tar.gz
emacs-b2d5f31abf3d04628c9fe858fd80592e4f649097.zip
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)
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/ido.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0fe7ef21efc..6b9349a2fbd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12009-12-02 Andreas Politz <politza@fh-trier.de> (tiny change)
2
3 * ido.el (ido-file-internal): Handle filenames at point that do
4 not have a directory part. (Bug#5049)
5
12009-12-02 Juanma Barranquero <lekktu@gmail.com> 62009-12-02 Juanma Barranquero <lekktu@gmail.com>
2 7
3 * mpc.el (mpc-intersection, mpc-host, mpc-songs-playlist) 8 * 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."
2288 (ffap-guesser) 2288 (ffap-guesser)
2289 (ffap-string-at-point)))) 2289 (ffap-string-at-point))))
2290 (not (string-match "^http:/" fn)) 2290 (not (string-match "^http:/" fn))
2291 (setq d (file-name-directory fn)) 2291 (setq d (file-name-directory (expand-file-name fn)))
2292 (file-directory-p d)) 2292 (file-directory-p d))
2293 (setq ido-current-directory d) 2293 (setq ido-current-directory d)
2294 (setq initial (file-name-nondirectory fn)))))) 2294 (setq initial (file-name-nondirectory fn))))))