Rewrite popup handling + new minor mode: doom-hide-mode-line-mode
This commit is contained in:
parent
774d61be68
commit
8a666aedfe
15 changed files with 366 additions and 379 deletions
|
@ -61,10 +61,6 @@
|
|||
(imenu-list-minor-mode -1))))
|
||||
(doom/get-visible-buffers (doom/get-real-buffers))))
|
||||
|
||||
;;;###autoload
|
||||
(defun doom|hide-mode-line (&rest _)
|
||||
(setq mode-line-format nil))
|
||||
|
||||
;;;###autoload
|
||||
(defun doom/eldoc-show-in-mode-line (input)
|
||||
"Display string STR in the mode-line next to minibuffer."
|
||||
|
@ -92,5 +88,23 @@
|
|||
(sit-for eldoc-show-in-mode-line-delay))))
|
||||
(force-mode-line-update)))
|
||||
|
||||
(defvar-local doom-hide-mode-line nil)
|
||||
(defvar-local doom--mode-line nil)
|
||||
;;;###autoload
|
||||
(define-minor-mode doom-hide-mode-line-mode
|
||||
"Minor mode to hide the mode-line in the current buffer."
|
||||
:init-value nil
|
||||
:global nil
|
||||
:variable doom-hide-mode-line
|
||||
(if doom-hide-mode-line
|
||||
(setq doom--mode-line mode-line-format
|
||||
mode-line-format nil)
|
||||
(setq mode-line-format doom--mode-line
|
||||
doom--mode-line nil))
|
||||
(force-mode-line-update)
|
||||
;; Apparently force-mode-line-update is not always enough to
|
||||
;; redisplay the mode-line
|
||||
(redraw-display))
|
||||
|
||||
(provide 'defuns-ui)
|
||||
;;; defuns-ui.el ends here
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue