diff options
| author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2024-10-01 14:30:55 +0100 |
|---|---|---|
| committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2024-10-01 16:24:42 +0100 |
| commit | 8cbf1518d2db8bbc83688bddd563bdbfc1d51607 (patch) | |
| tree | 3f36bc2ce1571669bd44a9f13fb3500275cadb44 /Emacs/.config/emacs/elisp/hide-mode-line.el | |
| parent | b06202b882b0226e9348805838b01997da17eec2 (diff) | |
| download | dotfiles-8cbf1518d2db8bbc83688bddd563bdbfc1d51607.tar.gz dotfiles-8cbf1518d2db8bbc83688bddd563bdbfc1d51607.tar.bz2 dotfiles-8cbf1518d2db8bbc83688bddd563bdbfc1d51607.zip | |
(Emacs/elisp)~hide-mode-line is a globalised minor-mode
Diffstat (limited to 'Emacs/.config/emacs/elisp/hide-mode-line.el')
| -rw-r--r-- | Emacs/.config/emacs/elisp/hide-mode-line.el | 20 |
1 files changed, 13 insertions, 7 deletions
diff --git a/Emacs/.config/emacs/elisp/hide-mode-line.el b/Emacs/.config/emacs/elisp/hide-mode-line.el index 488bf3f..d7be502 100644 --- a/Emacs/.config/emacs/elisp/hide-mode-line.el +++ b/Emacs/.config/emacs/elisp/hide-mode-line.el @@ -25,14 +25,20 @@ (defvar hide-mode-line--prev-mode-line nil) -(define-minor-mode - hide-mode-line-mode - "Hides the mode line." +(define-minor-mode hide-mode-line-mode + "Minor mode for hiding model lines" :lighter nil - (if mode-line-format - (setq-local hide-mode-line--prev-mode-line mode-line-format - mode-line-format nil) - (setq-local mode-line-format hide-mode-line--prev-mode-line))) + (cond + ((and mode-line-format hide-mode-line-mode) + (setq-local hide-mode-line-mode t + hide-mode-line--prev-mode-line mode-line-format + mode-line-format nil)) + (t (setq-local hide-mode-line nil + mode-line-format hide-mode-line--prev-mode-line + hide-mode-line--prev-mode-line nil)))) + +(define-globalized-minor-mode global-hide-mode-line-mode hide-mode-line-mode + (lambda nil (hide-mode-line-mode t))) (provide 'hide-mode-line) ;;; hide-mode-line.el ends here |