diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2018-06-10 07:56:11 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2018-06-10 07:56:11 +0200 |
commit | 100df622e9563654b746ec415d92b3b555c3f2be (patch) | |
tree | 37ce66e93d8bcde49d519b336f63f13553a4cd93 /helm-files.el | |
parent | 2a3b85c9ab07535096fe17f5090a08b8a68e2ff3 (diff) |
Add a command for relsymlink and bind it
* helm-files.el (helm-find-files-map): Do it.
(helm-ff-run-relsymlink-file): Do it.
Diffstat (limited to 'helm-files.el')
-rw-r--r-- | helm-files.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/helm-files.el b/helm-files.el index f4c2248f..c55e3dda 100644 --- a/helm-files.el +++ b/helm-files.el @@ -443,6 +443,7 @@ from `helm-find-files'." (define-key map (kbd "M-B") 'helm-ff-run-byte-compile-file) (define-key map (kbd "M-L") 'helm-ff-run-load-file) (define-key map (kbd "M-S") 'helm-ff-run-symlink-file) + (define-key map (kbd "M-Y") 'helm-ff-run-relsymlink-file) (define-key map (kbd "M-H") 'helm-ff-run-hardlink-file) (define-key map (kbd "M-D") 'helm-ff-run-delete-file) (define-key map (kbd "M-K") 'helm-ff-run-kill-buffer-persistent) @@ -1534,6 +1535,13 @@ Behave differently depending of `helm-selection': (helm-exit-and-execute-action 'helm-find-files-symlink))) (put 'helm-ff-run-symlink-file 'helm-only t) +(defun helm-ff-run-relsymlink-file () + "Run Symlink file action from `helm-source-find-files'." + (interactive) + (with-helm-alive-p + (helm-exit-and-execute-action 'helm-find-files-relsymlink))) +(put 'helm-ff-run-relsymlink-file 'helm-only t) + (defun helm-ff-run-hardlink-file () "Run Hardlink file action from `helm-source-find-files'." (interactive) |