emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp ChangeLog ido.el


From: Glenn Morris
Subject: [Emacs-diffs] emacs/lisp ChangeLog ido.el
Date: Wed, 02 Dec 2009 03:00:50 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/12/02 03:00:49

Modified files:
        lisp           : ChangeLog ido.el 

Log message:
        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)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16792&r2=1.16793
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ido.el?cvsroot=emacs&r1=1.161&r2=1.162

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16792
retrieving revision 1.16793
diff -u -b -r1.16792 -r1.16793
--- ChangeLog   2 Dec 2009 02:08:21 -0000       1.16792
+++ ChangeLog   2 Dec 2009 03:00:41 -0000       1.16793
@@ -1,3 +1,8 @@
+2009-12-02  Andreas Politz  <address@hidden>  (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  <address@hidden>
 
        * mpc.el (mpc-intersection, mpc-host, mpc-songs-playlist)

Index: ido.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ido.el,v
retrieving revision 1.161
retrieving revision 1.162
diff -u -b -r1.161 -r1.162
--- ido.el      13 Nov 2009 22:19:53 -0000      1.161
+++ ido.el      2 Dec 2009 03:00:45 -0000       1.162
@@ -2288,7 +2288,7 @@
                              (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))))))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]