TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Add SPC f y n and SPC f y N to copy the name of a file

Browse source
This commit is contained in:
syl20bnr 2018-09-11 14:55:00 -04:00
parent ba93316939
commit 9f8b867af1
3 changed files with 19 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
doc/DOCUMENTATION.org
View file

@ -2395,6 +2395,8 @@ Files manipulation commands (start with ~f~):
| ~SPC f y c~ | show and copy current file absolute path with line and column number in the minibuffer | | ~SPC f y c~ | show and copy current file absolute path with line and column number in the minibuffer |
| ~SPC f y d~ | show and copy current directory absolute path in the minibuffer | | ~SPC f y d~ | show and copy current directory absolute path in the minibuffer |
| ~SPC f y l~ | show and copy current file absolute path with line number in the minibuffer | | ~SPC f y l~ | show and copy current file absolute path with line number in the minibuffer |
| ~SPC f y n~ | show and copy current file name with extensionin the minibuffer |
| ~SPC f y N~ | show and copy current file name without extensionin the minibuffer |
| ~SPC f y y~ | show and copy current file absolute path in the minibuffer | | ~SPC f y y~ | show and copy current file absolute path in the minibuffer |
**** Frame manipulation key bindings **** Frame manipulation key bindings

15
layers/+spacemacs/spacemacs-defaults/funcs.el
View file

@ -565,6 +565,21 @@ ones created by `magit' and `dired'."
(message "%s" (kill-new file-path)) (message "%s" (kill-new file-path))
(message "WARNING: Current buffer is not attached to a file!"))) (message "WARNING: Current buffer is not attached to a file!")))
(defun spacemacs/copy-file-name ()
"Copy and show the file name of the current buffer."
(interactive)
(if-let (file-name (file-name-nondirectory (spacemacs--file-path)))
(message "%s" (kill-new file-name))
(message "WARNING: Current buffer is not attached to a file!")))
(defun spacemacs/copy-file-name-base ()
"Copy and show the file name without its final extension of the current
buffer."
(interactive)
(if-let (file-name (file-name-base (spacemacs--file-path)))
(message "%s" (kill-new file-name))
(message "WARNING: Current buffer is not attached to a file!")))
(defun spacemacs/copy-file-path-with-line () (defun spacemacs/copy-file-path-with-line ()
"Copy and show the file path of the current buffer, including line number." "Copy and show the file path of the current buffer, including line number."
(interactive) (interactive)

2
layers/+spacemacs/spacemacs-defaults/keybindings.el
View file

@ -228,6 +228,8 @@
"fyc" 'spacemacs/copy-file-path-with-line-column "fyc" 'spacemacs/copy-file-path-with-line-column
"fyd" 'spacemacs/copy-directory-path "fyd" 'spacemacs/copy-directory-path
"fyl" 'spacemacs/copy-file-path-with-line "fyl" 'spacemacs/copy-file-path-with-line
"fyn" 'spacemacs/copy-file-name
"fyN" 'spacemacs/copy-file-name-base
"fyy" 'spacemacs/copy-file-path) "fyy" 'spacemacs/copy-file-path)
;; frame ---------------------------------------------------------------------- ;; frame ----------------------------------------------------------------------
(spacemacs/set-leader-keys (spacemacs/set-leader-keys