From 2d33e58bd8efaf53d7f898e56fbb9a606f5e8862 Mon Sep 17 00:00:00 2001 From: Aryadev Chavali <aryadev@aryadevchavali.com> Date: Sun, 26 Mar 2023 20:07:23 +0100 Subject: (Emacs)+hide-mode-line package My custom package to quickly hide and restore the mode line. Olivetti does this automatically but I like having no mode line without the other changes. --- Emacs/.config/emacs/elisp/hide-mode-line.el | 41 +++++++++++++++++++++++++++++ 1 file changed, 41 insertions(+) create mode 100644 Emacs/.config/emacs/elisp/hide-mode-line.el (limited to 'Emacs/.config/emacs/elisp') diff --git a/Emacs/.config/emacs/elisp/hide-mode-line.el b/Emacs/.config/emacs/elisp/hide-mode-line.el new file mode 100644 index 0000000..a16667d --- /dev/null +++ b/Emacs/.config/emacs/elisp/hide-mode-line.el @@ -0,0 +1,41 @@ +;;; hide-mode-line.el --- Hide the modeline super easy -*- lexical-binding: t; -*- + +;; Copyright (C) 2023 Aryadev Chavali + +;; Author: Aryadev Chavali <aryadev@aryadevchavali.com> +;; Keywords: + +;; This program is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see <https://www.gnu.org/licenses/>. + +;;; Commentary: + +;; Defines a minor mode which toggles off the mode line. + +;;; Code: + +(defvar hide-mode-line--prev-mode-line nil) + +(define-minor-mode + hide-mode-line-mode + "Hides the mode line." + :lighter nil + (if mode-line-format + (progn + (setq-local hide-mode-line--prev-mode-line mode-line-format) + (setq-local mode-line-format nil)) + (setq-local mode-line-format hide-mode-line--prev-mode-line))) + + +(provide 'hide-mode-line) +;;; hide-mode-line.el ends here -- cgit v1.2.3-13-gbd6f