Refactor how helm mode-line is hidden

This commit is contained in:
Henrik Lissner 2018-08-05 22:06:46 +02:00
parent 41697e4e6e
commit 0cfd35cfc0
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -60,8 +60,9 @@ be negative.")
:after helm-mode
:init
(setq helm-candidate-number-limit 50
;; Display extraineous helm UI elements
;; Remove extraineous helm UI elements
helm-display-header-line nil
helm-mode-line-string nil
helm-ff-auto-update-initial-value nil
helm-find-files-doc-header nil
;; Don't override evil-ex's completion
@ -105,10 +106,10 @@ be negative.")
plist)))
(advice-add #'helm :filter-args #'+helm*replace-prompt)
(defun +helm*hide-header (&rest _)
"Hide header-line & mode-line in helm windows."
(hide-mode-line-mode +1))
(advice-add #'helm-display-mode-line :override #'+helm*hide-header)
(defun +helm*hide-mode-line (&rest _)
(unless helm-mode-line-string
(hide-mode-line-mode +1)))
(advice-add #'helm-display-mode-line :override #'+helm*hide-mode-line)
(defun +helm*hide-minibuffer-maybe ()
"Hide minibuffer in Helm session if we use the header line as input field."