mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(frame-notice-user-settings): If background

Browse source 
color has been changed, update background-mode from it,
then update faces.
This commit is contained in:
Karl Heuer 1999-07-30 15:50:26 +00:00
parent 331e2d7b60
commit 4e20aeafbf
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/frame.el
View file

@ -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)))))