summaryrefslogtreecommitdiff
path: root/emacs/site-lisp/modeline-config.el
blob: 5b1f7e5708be60db08e0657e9d9774bdbe3fb1e9 (plain)
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
;;; Modeline config

(provide 'modeline-config)

(use-package doom-modeline
  :init
  (doom-modeline-mode 1))
(use-package minions
  :init
  (minions-mode 1)
  :custom
  (minions-prominent-modes '(persp-mode auto-fill-mode eldoc-mode eglot-mode lsp-mode)))

(setq-default global-mode-string '("" (:eval (concat (with-face (format " [%s]  " (shorten-path default-directory))
                                                                :weight 'bold
                                                                :foreground "green2")))))

;; -----------------------------------------------------------------------------
;; telephone line stuff

;; (setq telephone-line-primary-left-separator 'telephone-line-tan-left)
;; (setq telephone-line-primary-right-separator 'telephone-line-tan-right)

;; (telephone-line-defsegment* telephone-line-time-segment ()
;;   (telephone-line-raw display-time-string t))

;; (setq telephone-line-lhs
;;       '((evil   . (telephone-line-evil-tag-segment))
;;         (accent . (telephone-line-vc-segment
;;                    telephone-line-erc-modified-channels-segment
;;                    telephone-line-process-segment))
;;         (nil    . (telephone-line-buffer-segment
;;                    telephone-line-minions-mode-segment))))
;; (setq telephone-line-rhs
;;       '((nil    . (telephone-line-misc-info-segment))
;;         (accent . (telephone-line-time-segment))
;;         (evil   . (telephone-line-airline-position-segment))))

;; (telephone-line-mode 1)