about summary refs log tree commit diff stats
path: root/.emacs.d/lisp/init-modeline.el
blob: 4ddc64f5503d8f36b087f2e2d2243af5f529c799 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
;;; init-modeline.el --- Modeline Configuration File -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:

(line-number-mode t)
(column-number-mode t)
;(size-indication-mode t) ; TODO

(use-package which-func
  :ensure nil
  :config
  (which-function-mode 1))

(use-package hl-todo
  :config
  (global-hl-todo-mode 1))

(use-package simple-modeline
  :hook (after-init . simple-modeline-mode)
  :custom
  (simple-modeline-segments
   '((simple-modeline-segment-modified
      simple-modeline-segment-buffer-name
      simple-modeline-segment-position)
     (simple-modeline-segment-minor-modes
      simple-modeline-segment-vc
      simple-modeline-segment-misc-info
      simple-modeline-segment-process
      simple-modeline-segment-major-mode))))

(use-package flycheck-indicator
  :after flycheck
  :hook (flycheck-mode . flycheck-indicator-mode)
  :custom
  (flycheck-indicator-icon-error 9632)
  (flycheck-indicator-icon-info 9679)
  (flycheck-indicator-icon-warning 9650)
  (flycheck-indicator-status-icons
   '((running . "◉")
     (errored . "◙")
     (finished . "●")
     (interrupted . "◘")
     (suspicious . "◘")
     (no-checker . "○")
     (not-checked . "○"))))

(provide 'init-modeline)
;;; init-modeline.el ends here