aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKim F. Storm2006-07-11 20:13:59 +0000
committerKim F. Storm2006-07-11 20:13:59 +0000
commitbac4dbd166a05e22635cd1cc18ecb0c694ab2ce2 (patch)
tree28e5ca9ccd5c4363e792c4668349249154ca2e84
parent2e42ee7bfb8ce50dd829b4b15d2013cd1e2ace9f (diff)
downloademacs-bac4dbd166a05e22635cd1cc18ecb0c694ab2ce2.tar.gz
emacs-bac4dbd166a05e22635cd1cc18ecb0c694ab2ce2.zip
(ido-copy-current-file-name): Use buffer-name if buffer-file-name is nil.
-rw-r--r--lisp/ido.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ido.el b/lisp/ido.el
index a4c26b52c98..be1cba62f27 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2895,7 +2895,8 @@ With \\[universal-argument], pop all element."
2895 "Insert file name of current buffer. 2895 "Insert file name of current buffer.
2896If repeated, insert text from buffer instead." 2896If repeated, insert text from buffer instead."
2897 (interactive "P") 2897 (interactive "P")
2898 (let* ((bfname (buffer-file-name ido-entry-buffer)) 2898 (let* ((bfname (or (buffer-file-name ido-entry-buffer)
2899 (buffer-name ido-entry-buffer)))
2899 (name (and bfname (file-name-nondirectory bfname)))) 2900 (name (and bfname (file-name-nondirectory bfname))))
2900 (when name 2901 (when name
2901 (setq ido-text-init 2902 (setq ido-text-init