Raymond Toy writes:
(let ((face 'default)
(default-font "Courier-10:lang=en"))
(set-specifier
(face-font face)
(cons '(x)
(fc-name-unparse
(fc-font-match (selected-device)
(fc-name-parse-harder default-font))))))
OK, the problem is in fc-font-match, then. I'll need to think about this.
Still crashes because fc-name-unparse apparently still leaves the
charset stuff. But using
(let ((face 'default)
(default-font "Courier-10:lang=en"))
(set-specifier
(face-font face)
(cons '(x)
(fc-name-parse-harder
(fc-name-unparse
This probably doesn't work since fc-name-parse leaves you with a
fontconfig object, not something that the font machinery knows about
IIRC.
Invalid argument: Invalid specifier locale, x
It's been so long since I worked with specifiers that I don't remember
how to do that anymore.
I'll be happy to help with that in a few hours. Right now, gotta run!
Steve
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta