help-gnu-emacs
[Top][All Lists]
Advanced

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

Re: strange face in buffer-mode


From: Emanuel Berg
Subject: Re: strange face in buffer-mode
Date: Wed, 16 Dec 2020 14:02:46 +0100
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (gnu/linux)

> the /d part of ELisp/d comes in the `warning' face.
> shouldn't that be the usual `font-lock-warning-face'?
>
> (why the upcase L BTW? ugly)

(defun copy-face-attributes (src dst)
  (when (and (facep src)
             (facep dst) )
    (let ((fg (face-attribute src :foreground nil 'default))
          (bg (face-attribute src :background nil 'default))
          (wt (face-attribute src :weight     nil 'default)) )
      (sfa dst fg wt bg) )))

(copy-face-attributes 'font-lock-warning-face 'warning)

-- 
underground experts united
http://user.it.uu.se/~embe8573
https://dataswamp.org/~incal




reply via email to

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