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

ui/doom-modeline: optimize/refactor flycheck segment

Browse Source
This commit is contained in:
Henrik Lissner
2018-05-29 14:06:39 +02:00
parent 9ae99deb65
commit 442aa91eea
1 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -69,10 +69,6 @@
(defvar +doom-modeline-bar-width 3 (defvar +doom-modeline-bar-width 3
"How wide the mode-line bar should be (only respected in GUI emacs).") "How wide the mode-line bar should be (only respected in GUI emacs).")
(defvar +doom-modeline-vspc
(propertize " " 'face 'variable-pitch)
"TODO")
(defvar +doom-modeline-buffer-file-name-style 'truncate-upto-project (defvar +doom-modeline-buffer-file-name-style 'truncate-upto-project
"Determines the style used by `+doom-modeline-buffer-file-name'. "Determines the style used by `+doom-modeline-buffer-file-name'.
@ -422,6 +418,10 @@ directory, the file name, and its state (modified, read-only or non-existent)."
;; flycheck ;; flycheck
;; ;;
(defvar +doom-modeline-vspc
(propertize " " 'face 'variable-pitch)
"TODO")
(defun +doom-ml-icon (icon &optional text face voffset) (defun +doom-ml-icon (icon &optional text face voffset)
"Displays an octicon ICON with FACE, followed by TEXT. Uses "Displays an octicon ICON with FACE, followed by TEXT. Uses
`all-the-icons-octicon' to fetch the icon." `all-the-icons-octicon' to fetch the icon."
@ -453,10 +453,9 @@ directory, the file name, and its state (modified, read-only or non-existent)."
('errored (+doom-ml-icon "sim_card_alert" "Error" 'doom-modeline-urgent)) ('errored (+doom-ml-icon "sim_card_alert" "Error" 'doom-modeline-urgent))
('interrupted (+doom-ml-icon "pause" "Interrupted" 'font-lock-doc-face))))) ('interrupted (+doom-ml-icon "pause" "Interrupted" 'font-lock-doc-face)))))
(def-modeline-segment! flycheck (def-modeline-var! flycheck +doom-modeline--flycheck
"Displays color-coded flycheck error status in the current buffer with pretty "Displays color-coded flycheck error status in the current buffer with pretty
icons." icons.")
+doom-modeline--flycheck)
;; ;;