diff options
| author | Craig Jennings <c@cjennings.net> | 2026-07-02 10:20:08 -0400 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2026-07-02 10:20:08 -0400 |
| commit | 82b195278b551839314edf1bfab37d5f54c432cb (patch) | |
| tree | 181e6aae830e63048c919525c583dc156e058c05 /modules | |
| parent | 4b53b52507faef662a8f670b4b80cbe24290de95 (diff) | |
| download | dotemacs-82b195278b551839314edf1bfab37d5f54c432cb.tar.gz dotemacs-82b195278b551839314edf1bfab37d5f54c432cb.zip | |
feat(ai-term): render Claude Code session colors in dupre hues
Claude Code's /color picks a session accent from eight names, each emitted as a fixed xterm-256 index (probed against v2.1.198 by cycling /color in a scratch tmux session and reading the SGR codes). Agent terminals now pin all eight indices plus the bypass banner to dupre faces, so any /color choice renders in the theme's palette instead of stock xterm hues. dupre has no orange or pink, so those borrow red+1 and magenta+1. If a Claude Code update moves an index, the stock hue comes back (the alist docstring carries the re-probe note).
Diffstat (limited to 'modules')
| -rw-r--r-- | modules/ai-term-backend-eat.el | 24 | ||||
| -rw-r--r-- | modules/ai-term.el | 67 |
2 files changed, 65 insertions, 26 deletions
diff --git a/modules/ai-term-backend-eat.el b/modules/ai-term-backend-eat.el index 82218ca7..21385e37 100644 --- a/modules/ai-term-backend-eat.el +++ b/modules/ai-term-backend-eat.el @@ -30,7 +30,7 @@ (defvar eat-buffer-name) (defvar eat-semi-char-mode-map) (defvar eat-terminal) -(defvar cj/ai-term-accent-color-indices) +(defvar cj/ai-term-palette-faces) (defun cj/--ai-term-send-string (buffer string) "Send STRING to BUFFER's terminal process (the agent's shell). @@ -40,20 +40,20 @@ Sends to the pty directly so the launch command reaches the shell EAT runs." (process-send-string proc string)))) (defun cj/--ai-term-apply-accent (buffer) - "Point BUFFER's terminal accent palette entries at `cj/ai-term-accent'. -Repaints each index in `cj/ai-term-accent-color-indices' in this -terminal's own 256-color palette (eat keeps one per terminal), so the -agent's accent -- Claude Code's rose banner, borders, spinner -- renders -in the accent face's color while every other eat terminal keeps the true -palette. A no-op when BUFFER has no live eat terminal. Takes effect on -the terminal's next redraw; text already on screen keeps its old color -until the program repaints it (Claude Code's TUI repaints continuously)." + "Point BUFFER's terminal palette entries at their dupre faces. +Repaints each (INDEX . FACE) in `cj/ai-term-palette-faces' in this +terminal's own 256-color palette (eat keeps one per terminal), so Claude +Code's accents -- the bypass banner and every /color session color -- +render in dupre hues while other eat terminals keep the true palette. +A no-op when BUFFER has no live eat terminal. Takes effect on the +terminal's next redraw; text already on screen keeps its old color until +the program repaints it (Claude Code's TUI repaints continuously)." (with-current-buffer buffer (when (bound-and-true-p eat-terminal) - (dolist (index cj/ai-term-accent-color-indices) + (dolist (entry cj/ai-term-palette-faces) (eat-term-set-parameter eat-terminal - (intern (format "color-%d-face" index)) - 'cj/ai-term-accent))))) + (intern (format "color-%d-face" (car entry))) + (cdr entry)))))) (defun cj/--ai-term-show-or-create (dir name) "Show or create the AI-term buffer for project DIR with buffer NAME. diff --git a/modules/ai-term.el b/modules/ai-term.el index 0774758e..bd955292 100644 --- a/modules/ai-term.el +++ b/modules/ai-term.el @@ -117,22 +117,61 @@ fallback when `cj/--ai-term-last-size' is nil." (defface cj/ai-term-accent '((t :foreground "#67809c")) - "Accent color for agent terminals, defaulting to dupre blue. -Claude Code draws its accent (the bypass-permissions banner, borders, -spinner) with xterm-256 palette colors; agent terminals point those -palette entries at this face (see `cj/ai-term-accent-color-indices'), -so the accent renders in this face's foreground instead of the stock -rose red. Per-project colors later land as per-buffer overrides of -the same palette entries." + "Default accent for agent terminals: dupre blue. +Carries the elements Claude Code colors regardless of the session color +-- the bypass-permissions banner (xterm palette index 211, stock rose). +The /color session accents get their own faces below." :group 'ai-term) -(defvar cj/ai-term-accent-color-indices '(211) - "The xterm-256 palette indices agent terminals repaint with the accent. -211 (#ff87af, a rose pink) is Claude Code's accent as rendered through -the 256-color palette -- confirmed empirically on the bypass-permissions -banner. Add indices here if other accent elements surface in a -different palette slot. Applied per terminal by -`cj/--ai-term-apply-accent'; other eat terminals keep the true palette.") +;; One face per Claude Code /color session color, each pinned to its dupre +;; counterpart. Claude Code emits a fixed xterm-256 index per color name +;; (probed empirically against v2.1.198); `cj/ai-term-palette-faces' maps +;; those indices to these faces, and agent terminals render them instead of +;; the stock xterm hues. dupre has no orange or pink, so orange borrows +;; bright red (peach) and pink borrows bright magenta. +(defface cj/ai-term-color-red '((t :foreground "#d47c59")) + "Agent terminal rendering of Claude Code's red session color (dupre red)." + :group 'ai-term) +(defface cj/ai-term-color-blue '((t :foreground "#67809c")) + "Agent terminal rendering of Claude Code's blue session color (dupre blue)." + :group 'ai-term) +(defface cj/ai-term-color-green '((t :foreground "#a4ac64")) + "Agent terminal rendering of Claude Code's green session color (dupre green)." + :group 'ai-term) +(defface cj/ai-term-color-yellow '((t :foreground "#d7af5f")) + "Agent terminal rendering of Claude Code's yellow session color (dupre yellow)." + :group 'ai-term) +(defface cj/ai-term-color-purple '((t :foreground "#b294bb")) + "Agent terminal rendering of Claude Code's purple session color (dupre magenta)." + :group 'ai-term) +(defface cj/ai-term-color-orange '((t :foreground "#edb08f")) + "Agent terminal rendering of Claude Code's orange session color (dupre red+1)." + :group 'ai-term) +(defface cj/ai-term-color-pink '((t :foreground "#c397d8")) + "Agent terminal rendering of Claude Code's pink session color (dupre magenta+1)." + :group 'ai-term) +(defface cj/ai-term-color-cyan '((t :foreground "#8a9496")) + "Agent terminal rendering of Claude Code's cyan session color (dupre steel)." + :group 'ai-term) + +(defvar cj/ai-term-palette-faces + '((211 . cj/ai-term-accent) ; bypass banner (fixed, not a /color) + (167 . cj/ai-term-color-red) + (110 . cj/ai-term-color-blue) + (35 . cj/ai-term-color-green) + (178 . cj/ai-term-color-yellow) + (140 . cj/ai-term-color-purple) + (174 . cj/ai-term-color-orange) + (175 . cj/ai-term-color-pink) + (37 . cj/ai-term-color-cyan)) + "Alist of (XTERM-256-INDEX . FACE) repainted in agent terminals. +The indices are what Claude Code v2.1.198 emits: 211 for the fixed +bypass-permissions banner, the rest one per /color session color +\(probed by cycling /color in a scratch session and reading the SGR +codes). Applied per terminal by `cj/--ai-term-apply-accent', so other +eat terminals keep the true xterm palette. If a Claude Code update +moves an accent to a new index, the visible symptom is the stock xterm +hue coming back -- re-probe and update the index here.") ;; Agent buffers ("agent [<project>]") are buried, not killed, by the ;; kill-all sweep (F1 / `cj/dashboard-only'). Register the family pattern so |
