From 4e20aeafbf3729568df62f883113ba7983fe24df Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Fri, 30 Jul 1999 15:50:26 +0000 Subject: [PATCH] (frame-notice-user-settings): If background color has been changed, update background-mode from it, then update faces. --- lisp/frame.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/lisp/frame.el b/lisp/frame.el index e1adb7ba66e..ef15f9ab78e 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -371,6 +371,13 @@ These supersede the values given in `default-frame-alist'." (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))))) -- 2.39.5