diff options
| author | Case Duckworth | 2021-12-13 10:29:50 -0600 |
|---|---|---|
| committer | Case Duckworth | 2021-12-13 10:29:50 -0600 |
| commit | b11adad984e8160e366d7e154d12c378a9545b9a (patch) | |
| tree | 72c23feb56d4d05107ac8285537429786efcda0d /lisp/+modeline.el | |
| parent | Mostley add +key.el (but of course other stuff) (diff) | |
| download | emacs-b11adad984e8160e366d7e154d12c378a9545b9a.tar.gz emacs-b11adad984e8160e366d7e154d12c378a9545b9a.zip | |
Lots of changes, most interestingly browse-url stuff
Diffstat (limited to 'lisp/+modeline.el')
| -rw-r--r-- | lisp/+modeline.el | 8 |
1 files changed, 8 insertions, 0 deletions
| diff --git a/lisp/+modeline.el b/lisp/+modeline.el index 0dc34c7..7c74f76 100644 --- a/lisp/+modeline.el +++ b/lisp/+modeline.el | |||
| @@ -153,5 +153,13 @@ The order of elements matters: whichever one matches first is applied." | |||
| 153 | "Display `anzu--update-mode-line'." | 153 | "Display `anzu--update-mode-line'." |
| 154 | (concat " " (anzu--update-mode-line))) | 154 | (concat " " (anzu--update-mode-line))) |
| 155 | 155 | ||
| 156 | (defun +modeline-text-scale () | ||
| 157 | "Display text scaling level." | ||
| 158 | ;; adapted from https://github.com/seagle0128/doom-modeline | ||
| 159 | (when (and (boundp 'text-scale-mode-amount) | ||
| 160 | (/= text-scale-mode-amount 0)) | ||
| 161 | (format (if (> text-scale-mode-amount 0) " (%+d)" " (%-d)") | ||
| 162 | text-scale-mode-amount))) | ||
| 163 | |||
| 156 | (provide '+modeline) | 164 | (provide '+modeline) |
| 157 | ;;; +modeline.el ends here | 165 | ;;; +modeline.el ends here |