From eb11e227b56d9cdc90d6aadcf14e2bb313456ac8 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 23 May 2015 01:38:34 -0400 Subject: Add display-buffer binding to helm-buffer-map --- lisp/init-helm.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'lisp/init-helm.el') diff --git a/lisp/init-helm.el b/lisp/init-helm.el index eba3ab1..da07081 100644 --- a/lisp/init-helm.el +++ b/lisp/init-helm.el @@ -9,6 +9,11 @@ (setq helm-man-or-woman-function #'woman) +(defun km/helm-display-buffer () + (interactive) + (with-helm-alive-p + (helm-quit-and-execute-action #'display-buffer))) + (defun km/helm-ff-org-open-file () "Run `org-open-file' from `helm-source-find-files'." (interactive) @@ -19,7 +24,9 @@ (global-set-key (kbd "C-x c") nil) (after 'helm-files - (define-key helm-find-files-map (kbd "C-c x") 'km/helm-ff-org-open-file)) + (define-key helm-find-files-map (kbd "C-c x") 'km/helm-ff-org-open-file) + ;; Overrides `helm-buffer-switch-other-frame'. + (define-key helm-buffer-map (kbd "C-c C-o") 'km/helm-display-buffer)) (define-key helm-map ";" 'helm-maybe-exit-minibuffer) -- cgit v1.2.3