awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-19 13:43:36 -05:00
Code Issues Packages Projects Releases Wiki Activity

narf--flycheck-count -> narf/-flycheck-count

Browse Source
This commit is contained in:
Henrik Lissner
2016-05-13 00:26:36 -04:00
parent 0af304b311
commit 15fa9c0a9f
2 changed files with 8 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
core/core-ui.el
View File

@@ -370,13 +370,6 @@ iedit."
highlight-face))) highlight-face)))
;; flycheck ;; flycheck
(defun narf--flycheck-count (state)
"Return flycheck information for the given error type STATE."
(when (flycheck-has-current-errors-p state)
(if (eq 'running flycheck-last-status-change)
"?"
(cdr-safe (assq state (flycheck-count-errors flycheck-current-errors))))))
(defface spaceline-flycheck-error (defface spaceline-flycheck-error
'((t (:foreground "#FC5C94" :distant-foreground "#A20C41"))) '((t (:foreground "#FC5C94" :distant-foreground "#A20C41")))
"Face for flycheck error feedback in the modeline.") "Face for flycheck error feedback in the modeline.")

8
core/defuns/defuns-spaceline.el
View File

@@ -9,5 +9,13 @@
(replace-match "" t t s) (replace-match "" t t s)
s)))))) s))))))
;;;###autoload
(defun narf/-flycheck-count (state)
"Return flycheck information for the given error type STATE."
(when (flycheck-has-current-errors-p state)
(if (eq 'running flycheck-last-status-change)
"?"
(cdr-safe (assq state (flycheck-count-errors flycheck-current-errors))))))
(provide 'defuns-spaceline) (provide 'defuns-spaceline)
;;; defuns-spaceline.el ends here ;;; defuns-spaceline.el ends here