diff --git a/core/prelude-core.el b/core/prelude-core.el index e0a96dd..389eb75 100644 --- a/core/prelude-core.el +++ b/core/prelude-core.el @@ -181,16 +181,6 @@ point reaches the beginning or end of the buffer, stop there." 'display '(left-fringe right-triangle)) 'modification-hooks '(prelude-todo-ov-evaporate))) -(defun prelude-copy-file-name-to-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 - (kill-new filename) - (message "Copied buffer file name '%s' to the clipboard." filename)))) - (defun prelude-get-positions-of-line-or-region () "Return positions (beg . end) of the current line or region." diff --git a/core/prelude-mode.el b/core/prelude-mode.el index fda439f..39bfdcc 100644 --- a/core/prelude-mode.el +++ b/core/prelude-mode.el @@ -87,8 +87,7 @@ ("Files" ["Open with..." prelude-open-with] ["Delete file and buffer" prelude-delete-file-and-buffer] - ["Rename buffer and file" prelude-rename-buffer-and-file] - ["Copy file name to clipboard" prelude-copy-file-name-to-clipboard]) + ["Rename buffer and file" prelude-rename-buffer-and-file]) ("Buffers" ["Clean up buffer or region" prelude-cleanup-buffer-or-region]