diff options
author | Kyle Meyer <kyle@kyleam.com> | 2016-11-19 00:36:56 -0500 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2016-11-19 00:36:56 -0500 |
commit | 8df84d4122bd492c300ff75b06f6fdbf086301ab (patch) | |
tree | fdc8c403796cef93de192c7fe90187a46350c8fd /lisp | |
parent | f1260b634836519e98e8c0b4ee8a29ecb66dfec3 (diff) | |
download | emacs.d-8df84d4122bd492c300ff75b06f6fdbf086301ab.tar.gz |
helm: Add below variants for buffers and files
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/km-helm.el | 18 |
1 files changed, 18 insertions, 0 deletions
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 |