Create a better default mode line
This commit is contained in:
parent
4dfd297f8f
commit
5803e12137
1 changed files with 8 additions and 1 deletions
|
@ -7,7 +7,14 @@
|
||||||
(define-key menu-bar-tools-menu [games] nil)
|
(define-key menu-bar-tools-menu [games] nil)
|
||||||
(display-time-mode 1)
|
(display-time-mode 1)
|
||||||
(global-prettify-symbols-mode 1)
|
(global-prettify-symbols-mode 1)
|
||||||
(setq-default mode-line-format nil)
|
(setq-default mode-line-format
|
||||||
|
(list "-"
|
||||||
|
(system-name)
|
||||||
|
'mode-line-frame-identification
|
||||||
|
"%b "
|
||||||
|
'(line-number-mode "%l ")
|
||||||
|
'(:eval (when-let (vc vc-mode)
|
||||||
|
(list (substring vc 5) " ")))))
|
||||||
|
|
||||||
;; Cursor and mouse
|
;; Cursor and mouse
|
||||||
(column-number-mode -1)
|
(column-number-mode -1)
|
||||||
|
|
Loading…
Add table
Reference in a new issue