Toggle mode-line
This commit is contained in:
parent
efcfc9ba30
commit
3dc56a1f4d
1 changed files with 8 additions and 0 deletions
8
init.el
8
init.el
|
@ -181,6 +181,14 @@
|
|||
(setq mode-line-format
|
||||
(append '("-" hs-headline) mode-line-format)))))
|
||||
|
||||
(defun mk/toggle-mode-line ()
|
||||
(interactive)
|
||||
(if (eql mode-line-format nil)
|
||||
(setq mode-line-format mk/mode-line-format)
|
||||
(setq mode-line-format nil)))
|
||||
|
||||
(keymap-global-set "<f9>" 'mk/toggle-mode-line)
|
||||
|
||||
(set-face-attribute 'mode-line nil
|
||||
:slant 'italic
|
||||
:weight 'bold
|
||||
|
|
Loading…
Add table
Reference in a new issue