* bug#2845: 23.0.92; 'Save Options' does not save font setting
@ 2009-07-23 16:59 Adrian Robert
0 siblings, 0 replies; only message in thread
From: Adrian Robert @ 2009-07-23 16:59 UTC (permalink / raw)
To: 2845; +Cc: David Reitter
> (defun ns-respond-to-change-font ()
> "Respond to changeFont: event, expecting ns-input-font and\n\
> ns-input-fontsize of new font."
> (interactive)
> (let ((face 'default))
> (set-face-attribute face t
> :family ns-input-font
> :height (* 10 ns-input-fontsize))
> (set-face-attribute face (selected-frame)
> :family ns-input-font
> :height (* 10 ns-input-fontsize))
> (let ((spec
> (list (list t (face-attr-construct 'default)))))
> (put face 'customized-face spec)
> (custom-push-theme 'theme-face face 'user 'set spec)
> (put face 'face-modified nil))))
This would change the behavior of the font panel in other
circumstances so that it wouldn't just set the font of the current
frame. Also it seems to work around the functionality in menu-set-font.
We might need to implement x-select-font to put up a font panel and
return the result (without doing any actual setting of anything itself).
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2009-07-23 16:59 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2009-07-23 16:59 bug#2845: 23.0.92; 'Save Options' does not save font setting Adrian Robert
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).