Function: eca-chat--paint-user-message
eca-chat--paint-user-message is a natively compiled function defined
in eca-chat.el.
Signature
(eca-chat--paint-user-message OV-LABEL)
Documentation
Apply eca-chat-user-messages-face over the user message of OV-LABEL.
Markdown fontification sets face on spans of the message (bold,
inline code), hiding the label's font-lock-face there, while an
overlay face merges over both, so the background covers the whole
message. The trailing newline is included so :extend reaches the
window edge on the last line too. Text inserted at the overlay start
(an older history page) stays outside of it.
Source Code
;; Defined in /nix/store/jklqzw6pzz6j4jrbv8wy0iwgi7jlrbld-emacs-packages-deps/share/emacs/site-lisp/elpa/eca-20260928.1827/eca-chat.el
(defun eca-chat--paint-user-message (ov-label)
"Apply `eca-chat-user-messages-face' over the user message of OV-LABEL.
Markdown fontification sets `face' on spans of the message (bold,
inline code), hiding the label's `font-lock-face' there, while an
overlay face merges over both, so the background covers the whole
message. The trailing newline is included so `:extend' reaches the
window edge on the last line too. Text inserted at the overlay start
\(an older history page) stays outside of it."
(when-let* ((ov-content (overlay-get ov-label 'eca-chat--expandable-content-ov-content))
(end (overlay-start ov-content)))
(let ((ov (make-overlay (overlay-start ov-label) end (current-buffer) t nil)))
(overlay-put ov 'face 'eca-chat-user-messages-face)
(overlay-put ov 'evaporate t))))