emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 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