Commit ea162670 authored by Chong Yidong's avatar Chong Yidong

Fix an instance of dynamic-setting.el clobbering the default face.

* lisp/dynamic-setting.el (font-setting-change-default-font): Don't
change the default face if SET-FONT argument is non-nil.

Fixes: debbugs:9982
parent bdbc1c4e
2012-01-29 Chong Yidong <cyd@gnu.org>
* dynamic-setting.el (font-setting-change-default-font): Don't
change the default face if SET-FONT argument is non-nil (Bug#9982).
2012-01-29 Samuel Bronson <naesten@gmail.com> (tiny change)
* custom.el (defcustom): Add doc link to Lisp manual (Bug#10635).
......
......@@ -74,9 +74,10 @@ current form for the frame (i.e. hinting or somesuch changed)."
:font font-to-set))))))
;; Set for future frames.
(when set-font
;; FIXME: this is not going to play well with Custom themes.
(set-face-attribute 'default t :font new-font)
(let ((spec (list (list t (face-attr-construct 'default)))))
(progn
(put 'default 'customized-face spec)
(custom-push-theme 'theme-face 'default 'user 'set spec)
(put 'default 'face-modified nil))))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment