used kill-new instead of temp buffer in prelude-copy-file-name-to-clipboard
This commit is contained in:
parent
74a6b44884
commit
c8d307d8cc
1 changed files with 3 additions and 5 deletions
|
@ -175,16 +175,14 @@ the curson at its beginning, according to the current mode."
|
|||
'display '(left-fringe right-triangle)))))))
|
||||
|
||||
(defun prelude-copy-file-name-to-clipboard ()
|
||||
"Put the current file name on the clipboard."
|
||||
"Copy the current buffer file name to the clipboard."
|
||||
(interactive)
|
||||
(let ((filename (if (equal major-mode 'dired-mode)
|
||||
default-directory
|
||||
(buffer-file-name))))
|
||||
(when filename
|
||||
(with-temp-buffer
|
||||
(insert filename)
|
||||
(clipboard-kill-region (point-min) (point-max)))
|
||||
(message filename))))
|
||||
(kill-new filename)
|
||||
(message "Copied buffer file name '%s' to the clipboard." filename))))
|
||||
|
||||
(defun prelude-duplicate-current-line-or-region (arg)
|
||||
"Duplicates the current line or region ARG times.
|
||||
|
|
Loading…
Reference in a new issue