emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/cider 50020cb2e4 1/7: Force default face on eval result ov


From: ELPA Syncer
Subject: [nongnu] elpa/cider 50020cb2e4 1/7: Force default face on eval result overlays
Date: Fri, 11 Feb 2022 03:58:05 -0500 (EST)

branch: elpa/cider
commit 50020cb2e47f21c58d776c8f9fd4844b3d47eafc
Author: yuhan0 <qythium@gmail.com>
Commit: Bozhidar Batsov <bozhidar@batsov.dev>

    Force default face on eval result overlays
---
 cider-overlays.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/cider-overlays.el b/cider-overlays.el
index adb0463080..84954e3f0e 100644
--- a/cider-overlays.el
+++ b/cider-overlays.el
@@ -210,7 +210,9 @@ overlay."
                       (pcase cider-result-overlay-position
                         ('at-eol (line-end-position))
                         ('at-point (point)))))
-               (display-string (format format value))
+               ;; Specify `default' face, otherwise unformatted text will
+               ;; inherit the face of the following text.
+               (display-string (format (propertize format 'face 'default) 
value))
                (o nil))
           (remove-overlays beg end 'category type)
           (funcall (if cider-overlays-use-font-lock



reply via email to

[Prev in Thread] Current Thread [Next in Thread]