procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(frame-notice-user-settings): If we change the frame's font,

Browse source 
call frame-update-faces.
This commit is contained in:
Richard M. Stallman 1994-08-11 21:38:02 +00:00
parent 985a7a04dc
commit 86e58378af
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/frame.el
View file

@ -323,8 +323,11 @@ These supersede the values given in `default-frame-alist'.")
(setq newparms
(cons (cons (car (car tail)) newval) newparms))))
(setq tail (cdr tail)))
(setq newparms (nreverse newparms))
(modify-frame-parameters frame-initial-frame
(nreverse newparms)))))
newparms)
(if (assq 'font newparms)
(frame-update-faces frame-initial-frame)))))
;; Restore the original buffer.
(set-buffer old-buffer)