hydra.el (hydra-posframe-show-params): Add

Fixes #328
master
Oleh Krehel 7 years ago
parent e94b39171a
commit 406988f6e9
  1. 17
      hydra.el

@ -211,16 +211,21 @@ the body or the head."
(declare-function posframe-hide "posframe")
(declare-function posframe-poshandler-window-center "posframe")
(defvar hydra-posframe-show-params
'(:internal-border-width 1
:internal-border-color "red"
:poshandler posframe-poshandler-window-center)
"List of parameters passed to `posframe-show'.")
(defun hydra-posframe-show (str)
(require 'posframe)
(posframe-show
" *hydra-posframe*"
:string str
:internal-border-width 1
:internal-border-color "red"
:poshandler #'posframe-poshandler-window-center))
(apply #'posframe-show
" *hydra-posframe*"
:string str
hydra-posframe-show-params))
(defun hydra-posframe-hide ()
(require 'posframe)
(posframe-hide " *hydra-posframe*"))
(defvar hydra-hint-display-alist

Loading…
Cancel
Save