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