mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 00:10:48 -08:00
Code Issues Projects Releases Wiki Activity

Avoid code-duplication in which-key--hide-popup

Browse source
This commit is contained in:
Jonas Bernoulli 2021-05-30 20:17:49 +02:00
parent aa91a7cd83
commit 1f5e532852
No known key found for this signature in database
GPG key ID: 230C2EFBB326D927
1 changed files with 3 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

9
which-key.el
View file

@ -1143,17 +1143,14 @@ total height."
(when (and which-key-idle-secondary-delay which-key--secondary-timer-active)
(which-key--start-timer))
(which-key--lighter-restore)
(cl-case which-key-popup-type
;; Not necessary to hide minibuffer
;; (minibuffer (which-key--hide-buffer-minibuffer))
(side-window (which-key--hide-buffer-side-window))
(frame (which-key--hide-buffer-frame))
(custom (funcall which-key-custom-hide-popup-function)))))
(which-key--hide-popup-ignore-command)))
(defun which-key--hide-popup-ignore-command ()
"Version of `which-key--hide-popup' without the check of
`real-this-command'."
(cl-case which-key-popup-type
;; Not necessary to hide minibuffer
;; (minibuffer (which-key--hide-buffer-minibuffer))
(side-window (which-key--hide-buffer-side-window))
(frame (which-key--hide-buffer-frame))
(custom (funcall which-key-custom-hide-popup-function))))