changeset 25134:98d218afbb10

(frame-notice-user-settings): If background color has been changed, update background-mode from it, then update faces.
author Karl Heuer <kwzh@gnu.org>
date Fri, 30 Jul 1999 15:50:26 +0000
parents 11070f3c5b59
children d021d1a70ff0
files lisp/frame.el
diffstat 1 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Fri Jul 30 15:49:10 1999 +0000
+++ b/lisp/frame.el	Fri Jul 30 15:50:26 1999 +0000
@@ -371,6 +371,13 @@
 	    (setq newparms (nreverse newparms))
 	    (modify-frame-parameters frame-initial-frame
 				     newparms)
+	    ;; If we changed the background color,
+	    ;; we need to update the background-mode parameter
+	    ;; and maybe some faces too.
+	    (when (assq 'background-color newparms)
+	      (unless (assq 'background-mode newparms)
+		(frame-set-background-mode frame-initial-frame))
+	      (face-set-after-frame-default frame-initial-frame))
 	    (if (assq 'font newparms)
 		(frame-update-faces frame-initial-frame)))))