Function: ido-copy-current-file-name
ido-copy-current-file-name is an interactive and byte-compiled
function defined in ido.el.gz.
Signature
(ido-copy-current-file-name ALL)
Documentation
Insert file name of current buffer.
If repeated, insert text from buffer instead.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/ido.el.gz
(defun ido-copy-current-file-name (all)
"Insert file name of current buffer.
If repeated, insert text from buffer instead."
(interactive "P")
(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
(if (or all
(eq last-command this-command)
(not (equal (file-name-directory bfname) ido-current-directory))
(not (string-match "\\.[^.]*\\'" name)))
name
(substring name 0 (1+ (match-beginning 0)))))
(setq ido-exit 'refresh
ido-try-merged-list nil)
(exit-minibuffer))))