From 627b52b0c6f73edc94db90b1f76bd9f44a626ffd Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Tue, 19 Mar 2013 08:23:36 +0400 Subject: [PATCH] * lisp/whitespace.el (whitespace-color-on): Use `prepend' OVERRIDE value for `whitespace-line' face. Fixes: debbugs:13875 --- lisp/ChangeLog | 5 +++++ lisp/whitespace.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4c2b17ff0fa..85e89566b4d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-03-19 Dmitry Gutov + + * whitespace.el (whitespace-color-on): Use `prepend' OVERRIDE + value for `whitespace-line' face (Bug#13875). + 2013-03-19 Leo Liu * progmodes/compile.el (compilation-display-error): New command. diff --git a/lisp/whitespace.el b/lisp/whitespace.el index b0bb610aa3a..382d6f482e2 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el @@ -2209,7 +2209,7 @@ resultant list will be returned." ,(if (memq 'lines whitespace-active-style) 0 ; whole line 2) ; line tail - whitespace-line t))) + whitespace-line prepend))) ,@(when (or (memq 'space-before-tab whitespace-active-style) (memq 'space-before-tab::tab whitespace-active-style) (memq 'space-before-tab::space whitespace-active-style)) -- 2.39.2