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 ()
"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 ))
(vsep (propertize " " 'face '(:inherit (doom-modeline-panel variable-pitch)))))
(concat sep
(doom-modeline-icon 'material "fiber_manual_record" "●"
(if (bound-and-true-p evil-this-macro)
(char-to-string evil-this-macro)
"Macro")
'doom-modeline-panel
:v-adjust -0.225)
vsep
(doom-modeline-icon 'octicon "triangle-right" "▶" ">"
'doom-modeline-panel
:v-adjust -0.05)
sep))))
(vsep (propertize " " 'face
'(:inherit (doom-modeline-panel variable-pitch)))))
(concat
sep
(doom-modeline-icon 'material "fiber_manual_record" "●"
(if (bound-and-true-p evil-this-macro)
(char-to-string evil-this-macro)
"Macro")
'doom-modeline-panel
:v-adjust -0.225)
vsep
(doom-modeline-icon 'octicon "triangle-right" "▶" ">"
'doom-modeline-panel
:v-adjust -0.05)
sep))))
;; `anzu' and `evil-anzu' expose current/total state that can be displayed in the
;; mode-line.