diff options
| -rw-r--r-- | init.el | 2 | ||||
| -rw-r--r-- | lisp/km-helm.el | 6 |
2 files changed, 8 insertions, 0 deletions
@@ -1204,11 +1204,13 @@ :init (after 'helm-files (bind-keys :map helm-find-files-map + ("C-c ." . km/helm-visit-in-dired) ("C-c b" . km/helm-find-file-below) ("C-c x" . km/helm-ff-org-open-file) ("C-c C-o" . km/helm-display-file))) (after 'helm-locate (bind-keys :map helm-generic-files-map + ("C-c ." . km/helm-visit-in-dired) ("C-c b" . km/helm-find-file-below) ("C-c x" . km/helm-ff-org-open-file) ("C-c C-o" . km/helm-display-file))) diff --git a/lisp/km-helm.el b/lisp/km-helm.el index b8d2dc0..f4471a1 100644 --- a/lisp/km-helm.el +++ b/lisp/km-helm.el @@ -29,6 +29,12 @@ (helm-exit-and-execute-action #'display-buffer))) ;;;###autoload +(defun km/helm-visit-in-dired () + (interactive) + (with-helm-alive-p + (helm-exit-and-execute-action #'helm-point-file-in-dired))) + +;;;###autoload (defun km/helm-display-file () (interactive) (with-helm-alive-p |