commit 1c1a8fd913480cb7dc23afa921455d042349452a parent e2debb34a03d790da14d9c6fe8dd7f303bec7304 Author: Kévin Le Gouguec <kevin.legouguec@gmail.com> Date: Sun, 15 May 2022 16:26:38 +0200 Shorten flymake lighter Diffstat:
| M | .emacs | | | 9 | +++++++++ |
1 file changed, 9 insertions(+), 0 deletions(-)
diff --git a/.emacs b/.emacs @@ -326,6 +326,15 @@ (icon (my/symbol-as-icon ?⚙))) (setcar indicator (concat (apply #'propertize icon new-props) " ")))) +(with-eval-after-load 'flymake + (let ((indicator (propertize (my/symbol-as-icon ?⚒) 'face 'flymake-error))) + ;; Prefer customizing the string instead delight'ing, as flymake + ;; slaps a bunch of helpful properties on top of the lighter, + ;; which delight would strip. + (if (boundp 'flymake-mode-line-lighter) + (setq flymake-mode-line-lighter indicator) + (delight 'flymake-mode indicator 'flymake)))) + (add-hook 'magit-pre-refresh-hook 'diff-hl-magit-pre-refresh) (add-hook 'magit-post-refresh-hook 'diff-hl-magit-post-refresh)