1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-29 19:48:19 +00:00

(ido-copy-current-file-name): Use buffer-name if buffer-file-name is nil.

This commit is contained in:
Kim F. Storm 2006-07-11 20:13:59 +00:00
parent 2e42ee7bfb
commit bac4dbd166

View File

@ -2895,7 +2895,8 @@ With \\[universal-argument], pop all element."
"Insert file name of current buffer.
If repeated, insert text from buffer instead."
(interactive "P")
(let* ((bfname (buffer-file-name ido-entry-buffer))
(let* ((bfname (or (buffer-file-name ido-entry-buffer)
(buffer-name ido-entry-buffer)))
(name (and bfname (file-name-nondirectory bfname))))
(when name
(setq ido-text-init