From 6bf5e1a4d7227b04b83e22ba8cfec11722b537c0 Mon Sep 17 00:00:00 2001 From: laluxx Date: Wed, 24 Dec 2025 04:03:51 +0100 Subject: [PATCH] Geiser and proced --- doom-themes-base.el | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) diff --git a/doom-themes-base.el b/doom-themes-base.el index 9c919ea3..62ddf37f 100644 --- a/doom-themes-base.el +++ b/doom-themes-base.el @@ -1299,6 +1299,43 @@ (rainbow-delimiters-base-face :inherit 'default) (rainbow-delimiters-unmatched-face :foreground red :weight 'bold :inverse-video t) (rainbow-delimiters-mismatched-face :inherit 'rainbow-delimiters-unmatched-face) + ;;;; geiser + ;; (geiser-font-lock-autodoc-current-arg) + ;; (geiser-font-lock-autodoc-id) + ;; (geiser-font-lock-doc-button) + ;; (geiser-font-lock-doc-link) + ;; (geiser-font-lock-doc-title) + ;; (geiser-font-lock-error-link) + ;; (geiser-font-lock-image-button) + ;; (geiser-font-lock-repl-input) + (geiser-font-lock-repl-output :foreground fg) + (geiser-font-lock-repl-output-success :foreground green :background (doom-blend green bg 0.2) :extend t) + (geiser-font-lock-repl-output-warning :foreground yellow :background (doom-blend yellow bg 0.2) :extend t) + (geiser-font-lock-repl-output-error :foreground red :background (doom-blend red bg 0.2) :extend t) + ;; (geiser-font-lock-repl-prompt) + ;; (geiser-font-lock-xref-header) + ;; (geiser-font-lock-xref-link) + ;;;; proced + (proced-cpu :foreground comments) + (proced-emacs-pid :foreground functions) + (proced-executable :foreground green) + ;; (proced-interruptible-sleep-status-code) + ;; (proced-mark) + ;; (proced-marked) + (proced-mem :foreground comments) + ;; (proced-memory-high-usage) + ;; (proced-memory-low-usage) + ;; (proced-memory-medium-usage) + ;; (proced-pgrp) + (proced-pid :foreground keywords) + ;; (proced-ppid) + ;; (proced-run-status-code) + ;; (proced-sess) + (proced-session-leader-pid :foreground keywords :style 'underline) + ;; (proced-sort-header) + (proced-time-colon :foreground fg) + ;; (proced-uninterruptible-sleep-status-code) + ;; (proced-user) ;;;; re-builder (reb-match-0 :foreground orange :inverse-video t) (reb-match-1 :foreground magenta :inverse-video t)