From: "Dr. Werner Fink" <werner@suse.de>
To: Eli Zaretskii <eliz@gnu.org>
Cc: 25228@debbugs.gnu.org
Subject: bug#25228: 25.1; GNU emacs 25.1: custom-set-faces from init file ~/.emacs ignored
Date: Tue, 20 Dec 2016 12:18:58 +0100 [thread overview]
Message-ID: <20161220111858.gp723ihyr2ylqr7a@boole.suse.de> (raw)
In-Reply-To: <83d1gn4pl2.fsf@gnu.org>
[-- Attachment #1: Type: text/plain, Size: 2453 bytes --]
On Mon, Dec 19, 2016 at 10:43:37PM +0200, Eli Zaretskii wrote:
> > Date: Mon, 19 Dec 2016 21:20:49 +0100
> > From: martin rudalics <rudalics@gmx.at>
> > CC: werner@suse.de, 25228@debbugs.gnu.org
> >
> > IIUC all this ‘dynamic-setting-handle-config-changed-event’ mechanism is
> > about detecting changes applied to GConf and/or GSettings on the fly and
> > applying them to the running Emacs session. Such configuration settings
> > should never override anything specified by the user in her .emacs. The
> > mechanism was virtually inoperative for four years until Paul changed an
> > innocuous parameter descriptor. So this mechanism has never been tested
> > in all those years ...
>
> Can you describe how that mechanism is triggered by the offending
> change?
Just play around with eval-region/expression ... that is that I can switch with
(font-setting-change-default-font ":0" t)
or
(font-setting-change-default-font ":0" nil)
to the system default font settings and then with
(custom-set-faces '(default ((t (:family "B&H LucidaTypewriter"
:foundry "B&H" :slant normal :weight normal :height 110 :width normal)))))
IMHO it would be enough if the API below (custom-set-faces) would set
the default font used by (font-setting-change-default-font) ... or the
otherway around that (font-setting-change-default-font) would respect
the values specified by (custom-set-faces).
Debugging the code (font-setting-change-default-font) function shows with
(setq frame-list (frames-on-display-list ":0"))
(setq f (nth 0 frame-list))
to get the frame f that the face attribute is set correct
(face-attribute 'default :font f 'default)
#<font-object "-B&H-B&H LucidaTypewriter-normal-normal-normal-Sans-14-*-*-*-m-90-iso10646-1"> [2 times]
but using the outer call of font-get
(font-get (face-attribute 'default :font f 'default) :user-spec)
results in
"Monospace 11"
which is *not* LucidaTypewriter. And as the call
(frame-parameter f 'font-parameter)
returns nil the full call of the or switch
(or (font-get (face-attribute 'default :font f 'default)
:user-spec)
(frame-parameter f 'font-parameter))
does return
"Monospace 11"
Werner
--
"Having a smoking section in a restaurant is like having
a peeing section in a swimming pool." -- Edward Burr
[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 819 bytes --]
next prev parent reply other threads:[~2016-12-20 11:18 UTC|newest]
Thread overview: 52+ messages / expand[flat|nested] mbox.gz Atom feed top
2016-12-19 10:03 bug#25228: 25.1; GNU emacs 25.1: custom-set-faces from init file ~/.emacs ignored Dr. Werner Fink
2016-12-19 15:09 ` bug#25228: [emacs-bug] " Dr. Werner Fink
2016-12-19 17:37 ` Eli Zaretskii
2016-12-19 18:36 ` martin rudalics
2016-12-19 18:57 ` Eli Zaretskii
2016-12-19 20:20 ` martin rudalics
2016-12-19 20:43 ` Eli Zaretskii
2016-12-20 10:59 ` martin rudalics
2016-12-20 16:11 ` Eli Zaretskii
2016-12-20 16:25 ` martin rudalics
2016-12-20 17:06 ` Eli Zaretskii
2016-12-20 17:28 ` Dr. Werner Fink
2016-12-20 17:34 ` martin rudalics
2016-12-20 17:55 ` Eli Zaretskii
2016-12-20 18:18 ` martin rudalics
2016-12-20 18:39 ` Eli Zaretskii
2016-12-20 18:49 ` martin rudalics
2016-12-20 19:31 ` Eli Zaretskii
2016-12-20 19:11 ` Rostislav Svoboda
2016-12-20 19:24 ` Rostislav Svoboda
2016-12-20 19:34 ` Eli Zaretskii
2016-12-20 21:50 ` Rostislav Svoboda
2016-12-21 7:42 ` martin rudalics
2016-12-21 11:03 ` Rostislav Svoboda
2016-12-21 17:25 ` Eli Zaretskii
2016-12-22 8:35 ` martin rudalics
2016-12-22 11:59 ` Rostislav Svoboda
2016-12-22 17:45 ` martin rudalics
2016-12-20 19:29 ` martin rudalics
2016-12-21 8:11 ` Dr. Werner Fink
2016-12-21 8:47 ` bug#25228: [emacs-bug] " Dr. Werner Fink
2016-12-21 8:56 ` martin rudalics
2016-12-21 11:08 ` Dr. Werner Fink
2016-12-22 8:35 ` martin rudalics
2016-12-22 11:46 ` Dr. Werner Fink
2016-12-22 17:44 ` martin rudalics
2016-12-23 7:20 ` Dr. Werner Fink
2016-12-21 17:24 ` Eli Zaretskii
2016-12-21 17:39 ` Dr. Werner Fink
2016-12-21 18:04 ` Eli Zaretskii
2016-12-21 8:48 ` martin rudalics
2016-12-21 12:08 ` Dr. Werner Fink
2016-12-21 17:34 ` Eli Zaretskii
2016-12-22 8:35 ` martin rudalics
2016-12-22 17:30 ` Eli Zaretskii
2016-12-22 17:45 ` martin rudalics
2016-12-23 7:29 ` Dr. Werner Fink
2016-12-20 11:18 ` Dr. Werner Fink [this message]
2016-12-20 16:15 ` Eli Zaretskii
2016-12-20 16:41 ` Dr. Werner Fink
2016-12-20 16:56 ` bug#25228: [emacs-bug] " Dr. Werner Fink
2016-12-20 17:58 ` Eli Zaretskii
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20161220111858.gp723ihyr2ylqr7a@boole.suse.de \
--to=werner@suse.de \
--cc=25228@debbugs.gnu.org \
--cc=eliz@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).