Optimize mode line and locale settings
This commit is contained in:
parent
83fc3f0d9a
commit
b2cb7a13d6
1 changed files with 17 additions and 14 deletions
|
@ -8,19 +8,6 @@
|
||||||
(setq-default display-time-24hr-format t)
|
(setq-default display-time-24hr-format t)
|
||||||
(display-time-mode 1)
|
(display-time-mode 1)
|
||||||
(global-prettify-symbols-mode 1)
|
(global-prettify-symbols-mode 1)
|
||||||
(setq-default mode-line-format
|
|
||||||
(list "-"
|
|
||||||
'system-name
|
|
||||||
" "
|
|
||||||
'display-time-string
|
|
||||||
"-"
|
|
||||||
'mode-line-frame-identification
|
|
||||||
"%b "
|
|
||||||
'(line-number-mode "%l ")
|
|
||||||
'mode-line-process
|
|
||||||
"%n"
|
|
||||||
'(:eval (when-let (vc vc-mode)
|
|
||||||
(list (substring vc 5) " ")))))
|
|
||||||
|
|
||||||
;; Cursor and mouse
|
;; Cursor and mouse
|
||||||
(column-number-mode -1)
|
(column-number-mode -1)
|
||||||
|
@ -39,10 +26,11 @@
|
||||||
(car
|
(car
|
||||||
(calendar-iso-from-absolute
|
(calendar-iso-from-absolute
|
||||||
(calendar-absolute-from-gregorian
|
(calendar-absolute-from-gregorian
|
||||||
(list month day year)))))
|
(list year month day )))))
|
||||||
'font-lock-face 'font-lock-function-name-face))
|
'font-lock-face 'font-lock-function-name-face))
|
||||||
(setq-default ispell-program-name "aspell")
|
(setq-default ispell-program-name "aspell")
|
||||||
(setq-default grep-command "grep -i -nH -e ")
|
(setq-default grep-command "grep -i -nH -e ")
|
||||||
|
(setq-default display-time-format "W%W %F %R")
|
||||||
(when (eq system-type 'gnu/linux)
|
(when (eq system-type 'gnu/linux)
|
||||||
(setq-default shell-file-name "/bin/bash")
|
(setq-default shell-file-name "/bin/bash")
|
||||||
(setq-default tex-shell-file-name "/bin/bash"))
|
(setq-default tex-shell-file-name "/bin/bash"))
|
||||||
|
@ -82,3 +70,18 @@
|
||||||
(width . 85)
|
(width . 85)
|
||||||
(height . 70)
|
(height . 70)
|
||||||
(fullscreen . fullscreen)))
|
(fullscreen . fullscreen)))
|
||||||
|
|
||||||
|
;; Mode line
|
||||||
|
(setq-default mode-line-format
|
||||||
|
(list "-"
|
||||||
|
'system-name
|
||||||
|
" "
|
||||||
|
'display-time-string
|
||||||
|
"-"
|
||||||
|
'mode-line-frame-identification
|
||||||
|
"%b "
|
||||||
|
'(line-number-mode "%l ")
|
||||||
|
'mode-line-process
|
||||||
|
"%n"
|
||||||
|
'(:eval (when-let (vc vc-mode)
|
||||||
|
(list (substring vc 5) " ")))))
|
||||||
|
|
Loading…
Add table
Reference in a new issue