Date: Sun, 12 Jan 2014 20:04:22 +0400
From: Dmitry Antipov <dmantipov@yandex.ru>
Cc: 16420@debbugs.gnu.org
On 01/12/2014 02:01 AM, Lars Andersen wrote:
Starting from emacs -Q:
(defface flycheck-warning
'((((supports :underline (:style wave)))
:underline (:style wave :color "DarkOrange"))
(t
:underline t :inherit warning))
"Flycheck face for warnings."
:package-version '(flycheck . "0.13")
:group 'flycheck-faces)
(let ((ov (make-overlay (point) (point-at-eol)))
(face 'flycheck-warning))
(overlay-put ov 'face face)) ;; C-x C-e this last form to reproduce
Note that C-x C-e has no visible effect until you evaluate first
'defface' form too.