blob: b74a15d0c59a294ac1385b126ee85df400f9602a (
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
;;; Modeline config
(provide 'modeline-config)
;; (require 'battery)
;; (display-battery-mode 1)
(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)))
(require 'time)
(setq display-time-day-and-date t)
;; Set up the time timer.
(defun enable-display-time-backend ()
"Do the internal bit of `display-time-mode` but without adding it to the
global mode string"
(and display-time-timer (cancel-timer display-time-timer))
(setq display-time-timer nil)
(setq display-time-string "")
(setq display-time-load-average display-time-default-load-average)
(progn
;; (or (memq 'display-time-string global-mode-string)
;; (setq global-mode-string
;; (append global-mode-string '(display-time-string))))
;; Set up the time timer.
(setq display-time-timer
(run-at-time t display-time-interval
'display-time-event-handler))
;; Make the time appear right away.
(display-time-update)))
;; (enable-display-time-backend)
(display-time-mode 1)
;; there is more in the single-header file
;; -----------------------------------------------------------------------------
;; 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)
|
