summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw-modeline.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index 79249bb..7eca143 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el
@@ -73,6 +73,16 @@ indicator in the mode-line."
73 (minions-minor-modes-menu))))) 73 (minions-minor-modes-menu)))))
74 'mouse-face 'mode-line-highlight))) 74 'mouse-face 'mode-line-highlight)))
75 75
76(defun acdw-modeline/text-scale ()
77 ;; adapted from https://github.com/seagle0128/doom-modeline
78 (when (and (boundp 'text-scale-mode-amount)
79 (/= text-scale-mode-amount 0))
80 (format
81 (if (> text-scale-mode-amount 0)
82 " (%+d)"
83 " (%-d)")
84 text-scale-mode-amount)))
85
76(defun acdw-modeline/vc-branch () 86(defun acdw-modeline/vc-branch ()
77 ;; from https://www.gonsie.com/blorg/modeline.html, from Doom 87 ;; from https://www.gonsie.com/blorg/modeline.html, from Doom
78 (if-let ((backend (vc-backend buffer-file-name))) 88 (if-let ((backend (vc-backend buffer-file-name)))