Change my hidden modeline implementation to hide-mode-line
This commit is contained in:
parent
93851abbe2
commit
12a66c6ee7
@ -1786,6 +1786,14 @@ INFO plist."
|
|||||||
("C-c o" . ciel-co)))
|
("C-c o" . ciel-co)))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
|
** ~hide-mode-line~ to hide the modeline occasionally
|
||||||
|
|
||||||
|
#+begin_src emacs-lisp
|
||||||
|
(use-package hide-mode-line
|
||||||
|
:bind (:map gpolonkai/pers-map
|
||||||
|
("h" . hide-mode-line-mode)))
|
||||||
|
#+end_src
|
||||||
|
|
||||||
* Dired extras
|
* Dired extras
|
||||||
|
|
||||||
** ~dired-collapse~, to collapse directories that contain a single file somewhere deep
|
** ~dired-collapse~, to collapse directories that contain a single file somewhere deep
|
||||||
@ -3083,7 +3091,6 @@ Because that’s still my favourite language.
|
|||||||
("c" . gpolonkai/org-clock-map)
|
("c" . gpolonkai/org-clock-map)
|
||||||
("C-c" . calc)
|
("C-c" . calc)
|
||||||
("M-C" . clean-buffer-list)
|
("M-C" . clean-buffer-list)
|
||||||
("h" . hidden-mode-line-mode)
|
|
||||||
("i" . string-inflection-all-cycle)
|
("i" . string-inflection-all-cycle)
|
||||||
("C-i e" . "gergely@polonkai.eu")
|
("C-i e" . "gergely@polonkai.eu")
|
||||||
("C-i w" . "http://gergely.polonkai.eu/")
|
("C-i w" . "http://gergely.polonkai.eu/")
|
||||||
@ -3105,42 +3112,6 @@ Because that’s still my favourite language.
|
|||||||
("SPC" . gpolonkai/goto-next-char))
|
("SPC" . gpolonkai/goto-next-char))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
* Custom commands and functions
|
|
||||||
|
|
||||||
** Frame manipulation
|
|
||||||
|
|
||||||
*** Hidden modeline mode
|
|
||||||
:PROPERTIES:
|
|
||||||
:SOURCE: http://emacs-doctor.com/emacs-strip-tease.html
|
|
||||||
:END:
|
|
||||||
|
|
||||||
To temporarily hide the mode line.
|
|
||||||
|
|
||||||
#+BEGIN_SRC emacs-lisp
|
|
||||||
(defvar hidden-mode-line-mode nil)
|
|
||||||
(defvar hide-mode-line nil)
|
|
||||||
|
|
||||||
(define-minor-mode hidden-mode-line-mode
|
|
||||||
"Minor mode to hide the mode-line in the current buffer."
|
|
||||||
:init-value nil
|
|
||||||
:global nil
|
|
||||||
:variable hidden-mode-line-mode
|
|
||||||
:group 'editing-basics
|
|
||||||
(if hidden-mode-line-mode
|
|
||||||
(setq hide-mode-line mode-line-format
|
|
||||||
mode-line-format nil)
|
|
||||||
(setq mode-line-format hide-mode-line
|
|
||||||
hide-mode-line nil))
|
|
||||||
(force-mode-line-update)
|
|
||||||
(redraw-display)
|
|
||||||
(when (and (called-interactively-p 'interactive)
|
|
||||||
hidden-mode-line-mode)
|
|
||||||
(run-with-idle-timer
|
|
||||||
0 nil 'message
|
|
||||||
(concat "Hidden Mode Line Mode enabled. "
|
|
||||||
"Use M-x hidden-mode-line-mode to make mode-line appear."))))
|
|
||||||
#+END_SRC
|
|
||||||
|
|
||||||
* And finally, server mode
|
* And finally, server mode
|
||||||
|
|
||||||
Sometimes i start an ~emacsclient~ process, like for editing a commit message or something
|
Sometimes i start an ~emacsclient~ process, like for editing a commit message or something
|
||||||
|
Loading…
Reference in New Issue
Block a user