1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-04 13:03:09 -08:00

Fix doc, new frame parameters

This commit is contained in:
Bar Magal 2015-07-06 14:51:31 +03:00
parent 02140265c4
commit 44450f60c7

View file

@ -79,7 +79,7 @@ location is top or bottom.")
"Internal: Non-nil if which-key buffer has been setup.")
(defvar which-key--frame nil
"Internal: Holds reference to which-key frame.
Used when `which-key-popup-type' is 'popup.")
Used when `which-key-popup-type' is frame.")
;;;###autoload
(define-minor-mode which-key-mode
@ -236,8 +236,8 @@ need to start the closing timer."
(defun which-key/show-buffer-new-frame (act-popup-dim)
(let* ((height (car act-popup-dim))
(width (cdr act-popup-dim))
(frame-params (delq nil (list (when (and height width) (cons 'window-height height))
(when (and height width) (cons 'window-width width))
(frame-params (delq nil (list (when (and height width) (cons 'height height))
(when (and height width) (cons 'width width))
(cons 'minibuffer nil)
(cons 'name "which-key"))))
(alist (list (cons 'pop-up-frame-parameters frame-params)