From: Daniel Colascione <dancol@dancol.org>
Date: Tue, 19 Jun 2018 14:38:47 +0000 (-0700)
Subject: Fix theme application
X-Git-Tag: emacs-27.0.90~4789
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9b720ac5030a4ca84e8ebe8436027da0468624c;p=emacs.git

Fix theme application

Fix an inverted test.  Patch due to Andy Moreton.

* lisp/cus-face.el (custom-theme-set-faces): Correct sense of
`custom--should-apply-setting' test.
---

diff --git a/lisp/cus-face.el b/lisp/cus-face.el
index 039c1fafa70..54f5d51358f 100644
--- a/lisp/cus-face.el
+++ b/lisp/cus-face.el
@@ -342,7 +342,7 @@ argument list."
 	;; is aliased to.
 	(if (get face 'face-alias)
 	    (setq face (get face 'face-alias)))
-	(if (custom--should-apply-setting theme)
+	(if (not (custom--should-apply-setting theme))
 	    ;; Just update theme settings.
 	    (custom-push-theme 'theme-face face theme 'set spec)
 	  ;; Update theme settings and set the face spec.