Clean up mode line format

This commit is contained in:
Marcus Kammer 2020-12-01 17:32:43 +01:00
parent 1c5d216600
commit d342a3f9b8

View file

@ -15,7 +15,7 @@
(tab-bar-mode 1)))
;; Cursor and mouse
(column-number-mode -1)
(column-number-mode 1)
(mouse-wheel-mode 1)
(blink-cursor-mode -1)
@ -77,17 +77,11 @@
;; Mode line
(setq-default mode-line-format
(list "-"
; 'system-name
; " "
'display-time-string
"-"
"("
'(:eval (substring (mode-line-frame-control) 2))
"%b "
'(line-number-mode "%l ")
'(:eval (when-let (vc vc-mode)
(list (substring vc 5) "")))
")-"
'mode-line-modes
"%n"))
'((""
mode-line-frame-control "%b "
mode-name
vc-mode
" "
mode-line-position
mode-line-misc-info
)))