awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

ui/doom-modeline: optimize flycheck segment

Browse Source
This commit is contained in:
Henrik Lissner
2018-04-26 04:56:30 -04:00
parent a6d8a0b4ec
commit 630188e27e
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
modules/ui/doom-modeline/config.el
View File

@ -427,7 +427,8 @@ directory, the file name, and its state (modified, read-only or non-existent)."
(defvar-local +doom-modeline--flycheck nil)
(add-hook 'flycheck-status-changed-functions #'+doom-modeline|update-flycheck-segment)
(defun +doom-modeline|update-flycheck-segment (status)
(add-hook 'flycheck-mode-hook #'+doom-modeline|update-flycheck-segment)
(defun +doom-modeline|update-flycheck-segment (&optional status)
(setq +doom-modeline--flycheck
(pcase status
('finished (if flycheck-current-errors
@ -446,7 +447,7 @@ directory, the file name, and its state (modified, read-only or non-existent)."
(def-modeline-segment! flycheck
"Displays color-coded flycheck error status in the current buffer with pretty
icons."
(if (bound-and-true-p flycheck-mode) +doom-modeline--flycheck))
+doom-modeline--flycheck)
;;