emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Adjust v-adjust of flycheck icons in modeline

Browse source 
Some icons drooped too low (and others too high).

OCD INTENSIFIES
This commit is contained in:
Henrik Lissner 2017-06-16 14:18:03 +02:00
parent 41e8752d8f
commit a299621ff8
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 6 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

16
modules/ui/doom-modeline/config.el
View file

@ -364,14 +364,14 @@ directory, the file name, and its state (modified, read-only or non-existent)."
" ")))) " "))))
;; ;;
(defun +doom-ml-icon (icon &optional text face) (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."
(concat (concat
(if vc-mode " " " ") (if vc-mode " " " ")
(when icon (when icon
(concat (concat
(all-the-icons-material icon :face face :height 1.1 :v-adjust -0.25) (all-the-icons-material icon :face face :height 1.1 :v-adjust (or voffset -0.2))
;; (all-the-icons-octicon icon :face face :height 1.0 :v-adjust 0) ;; (all-the-icons-octicon icon :face face :height 1.0 :v-adjust 0)
(if text +doom-modeline-vspc))) (if text +doom-modeline-vspc)))
(when text (when text
@ -386,18 +386,14 @@ icons."
('finished (if flycheck-current-errors ('finished (if flycheck-current-errors
(let-alist (flycheck-count-errors flycheck-current-errors) (let-alist (flycheck-count-errors flycheck-current-errors)
(let ((sum (+ (or .error 0) (or .warning 0)))) (let ((sum (+ (or .error 0) (or .warning 0))))
;; do-not-disturb-alt (+doom-ml-icon "do_not_disturb_alt"
(+doom-ml-icon "do_not_disturb_alt" ;; "circle-slash"
(number-to-string sum) (number-to-string sum)
(if .error 'doom-modeline-urgent 'doom-modeline-warning)))) (if .error 'doom-modeline-urgent 'doom-modeline-warning)
;; check -0.25)))
(+doom-ml-icon "check" nil 'doom-modeline-info))) (+doom-ml-icon "check" nil 'doom-modeline-info)))
('running (+doom-ml-icon "access_time" nil 'font-lock-doc-face)) ('running (+doom-ml-icon "access_time" nil 'font-lock-doc-face -0.25))
;; ('running (+doom-ml-icon "ellipsis" "Running" 'font-lock-doc-face))
('no-checker (+doom-ml-icon "sim_card_alert" "-" 'font-lock-doc-face)) ('no-checker (+doom-ml-icon "sim_card_alert" "-" 'font-lock-doc-face))
;; ('no-checker (+doom-ml-icon "alert" "-" 'font-lock-doc-face))
('errored (+doom-ml-icon "sim_card_alert" "Error" 'doom-modeline-urgent)) ('errored (+doom-ml-icon "sim_card_alert" "Error" 'doom-modeline-urgent))
;; ('errored (+doom-ml-icon "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)))))
;; ('interrupted (+doom-ml-icon "x" "Interrupted" 'font-lock-doc-face))))) ;; ('interrupted (+doom-ml-icon "x" "Interrupted" 'font-lock-doc-face)))))