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

fix(modeline): update icons for +light

Browse source
This commit is contained in:
Ellis Kenyo 2023-09-14 19:29:51 +01:00 • committed by Henrik Lissner
parent 3191349182
commit e47accb773
3 changed files with 9 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

2
modules/lang/clojure/config.el
View file

@ -136,7 +136,7 @@
"Update repl icon on modeline with cider information." "Update repl icon on modeline with cider information."
(setq cider-modeline-icon (concat (setq cider-modeline-icon (concat
" " " "
(+modeline-format-icon 'faicon "terminal" "" face label -0.0575) (+modeline-format-icon 'faicon "nf-fa-terminal" "" face label -0.0575)
" ")) " "))
(add-to-list 'global-mode-string (add-to-list 'global-mode-string
'(t (:eval cider-modeline-icon)) '(t (:eval cider-modeline-icon))

2
modules/tools/lsp/+lsp.el
View file

@ -134,7 +134,7 @@ server getting expensively restarted when reverting buffers."
(label (if workspaces "LSP Connected" "LSP Disconnected"))) (label (if workspaces "LSP Connected" "LSP Disconnected")))
(setq lsp-modeline-icon (concat (setq lsp-modeline-icon (concat
" " " "
(+modeline-format-icon 'faicon "rocket" "" face label -0.0575) (+modeline-format-icon 'faicon "nf-fa-rocket" "" face label -0.0575)
" ")) " "))
(add-to-list 'global-mode-string (add-to-list 'global-mode-string
'(t (:eval lsp-modeline-icon)) '(t (:eval lsp-modeline-icon))

13
modules/ui/modeline/+light.el
View file

@ -115,6 +115,7 @@ Using optionals attributes FACE, HELP-ECHO and VOFFSET."
(let ((icon-set-fn (pcase icon-set (let ((icon-set-fn (pcase icon-set
('octicon #'nerd-icons-octicon) ('octicon #'nerd-icons-octicon)
('faicon #'nerd-icons-faicon) ('faicon #'nerd-icons-faicon)
('codicon #'nerd-icons-codicon)
('material #'nerd-icons-mdicon)))) ('material #'nerd-icons-mdicon))))
(propertize (concat (funcall icon-set-fn (propertize (concat (funcall icon-set-fn
icon icon
@ -416,7 +417,7 @@ Requires `anzu', also `evil-anzu' if using `evil-mode' for compatibility with
(let ((error (or .error 0)) (let ((error (or .error 0))
(warning (or .warning 0)) (warning (or .warning 0))
(info (or .info 0))) (info (or .info 0)))
(+modeline-format-icon 'material "do_not_disturb_alt" (+modeline-format-icon 'codicon "nf-cod-error"
(number-to-string (+ error warning info)) (number-to-string (+ error warning info))
(cond ((> error 0) 'error) (cond ((> error 0) 'error)
((> warning 0) 'warning) ((> warning 0) 'warning)
@ -425,11 +426,11 @@ Requires `anzu', also `evil-anzu' if using `evil-mode' for compatibility with
error error
warning warning
info)))) info))))
(+modeline-format-icon 'material "check" "" 'success))) (+modeline-format-icon 'material "nf-md-check" "" 'success)))
(`running (+modeline-format-icon 'material "access_time" "*" 'mode-line-inactive "Running...")) (`running (+modeline-format-icon 'faicon "nf-fa-hourglass" "*" 'mode-line-inactive "Running..."))
(`errored (+modeline-format-icon 'material "sim_card_alert" "!" 'error "Errored!")) (`errored (+modeline-format-icon 'material "nf-md-sim_alert" "!" 'error "Errored!"))
(`interrupted (+modeline-format-icon 'material "pause" "!" 'mode-line-inactive "Interrupted")) (`interrupted (+modeline-format-icon 'material "nf-md-pause" "!" 'mode-line-inactive "Interrupted"))
(`suspicious (+modeline-format-icon 'material "priority_high" "!" 'error "Suspicious")))))) (`suspicious (+modeline-format-icon 'material "nf-md-priority_high" "!" 'error "Suspicious"))))))