From 8df84d4122bd492c300ff75b06f6fdbf086301ab Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 19 Nov 2016 00:36:56 -0500 Subject: helm: Add below variants for buffers and files --- lisp/km-helm.el | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) (limited to 'lisp') diff --git a/lisp/km-helm.el b/lisp/km-helm.el index 9be507a..b8d2dc0 100644 --- a/lisp/km-helm.el +++ b/lisp/km-helm.el @@ -44,5 +44,23 @@ (with-helm-alive-p (helm-exit-and-execute-action #'org-open-file))) +;;;###autoload +(defun km/helm-display-buffer-below () + (interactive) + (with-helm-alive-p + (helm-exit-and-execute-action + (lambda (b) + (display-buffer b '(display-buffer-below-selected)))))) + +;;;###autoload +(defun km/helm-find-file-below () + (interactive) + (with-helm-alive-p + (helm-exit-and-execute-action + (lambda (f) + (select-window + (display-buffer (find-file-noselect f) + '(display-buffer-below-selected))))))) + (provide 'km-helm) ;;; km-helm.el ends here -- cgit v1.2.3