hiro/doom-modeline
1
0
Fork 0
mirror of https://github.com/vale981/doom-modeline synced 2025-03-05 09:21:38 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Format.

Browse source
This commit is contained in:
Vincent Zhang 2019-11-24 01:20:47 +08:00
parent 8806da711c
commit 711bc49106
1 changed files with 17 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
doom-modeline-segments.el
View file

@ -1071,21 +1071,24 @@ lines are selected, or the NxM dimensions of a block selection."
(defsubst doom-modeline--macro-recording () (defsubst doom-modeline--macro-recording ()
"Display current Emacs or evil macro being recorded." "Display current Emacs or evil macro being recorded."
(when (and (doom-modeline--active) (or defining-kbd-macro executing-kbd-macro)) (when (and (doom-modeline--active)
(or defining-kbd-macro executing-kbd-macro))
(let ((sep (propertize " " 'face 'doom-modeline-panel )) (let ((sep (propertize " " 'face 'doom-modeline-panel ))
(vsep (propertize " " 'face '(:inherit (doom-modeline-panel variable-pitch))))) (vsep (propertize " " 'face
(concat sep '(:inherit (doom-modeline-panel variable-pitch)))))
(doom-modeline-icon 'material "fiber_manual_record" "●" (concat
(if (bound-and-true-p evil-this-macro) sep
(char-to-string evil-this-macro) (doom-modeline-icon 'material "fiber_manual_record" "●"
"Macro") (if (bound-and-true-p evil-this-macro)
'doom-modeline-panel (char-to-string evil-this-macro)
:v-adjust -0.225) "Macro")
vsep 'doom-modeline-panel
(doom-modeline-icon 'octicon "triangle-right" "▶" ">" :v-adjust -0.225)
'doom-modeline-panel vsep
:v-adjust -0.05) (doom-modeline-icon 'octicon "triangle-right" "▶" ">"
sep)))) 'doom-modeline-panel
:v-adjust -0.05)
sep))))
;; `anzu' and `evil-anzu' expose current/total state that can be displayed in the ;; `anzu' and `evil-anzu' expose current/total state that can be displayed in the
;; mode-line. ;; mode-line.