>>>> "Uwe" == Uwe Brauer <oub(a)mat.ucm.es>
writes:
>>> On Thu, 06 Dec 2012 08:58:39 -0800, Raymond Toy
<toy.raymond(a)gmail.com> wrote:
>>
>>>> "Uwe" == Uwe
Brauer <oub(a)mat.ucm.es> writes:
Uwe> Hello
Uwe> I would not really say I solved the customize problem,
Uwe> however I found out which configure option does cause the
Uwe> problem.
Uwe> It is the evil --with-toolbars option
> Cool! But there must be something else too because I configure
--with-mule
> --with-xft=emacs,menubars. Nothing more, nothing less.
Uwe> That is
odd, with these option for me[1] everything is fine
Uwe> customize works! BTW you use the xft option how to you
As mentioned in my other message, I'm guessing it has something to do
with libXaw. Since I didn't have the headers, xemacs didn't use
libXaw. I'm guessing it use Motif instead.
Uwe> set fonts?
I use elisp to set the fonts. I got the basic idea from Aidan. Here
is what he sent to this list on Nov 10, 2012. My own version is
slightly different because it was based on an earlier version
Ray
(with-fboundp '(fc-name-unparse fc-font-match fc-name-parse)
(set-specifier
(face-font 'default)
(cons '(x)
(fc-name-unparse
(fc-font-match (selected-device)
(fc-name-parse "Monospace-11.5:lang=en")))))
(macrolet
((define-tags-and-set-faces (&rest tag-details)
(cons
'progn
(mapcan
(function*
(lambda ((tag-name regex size))
`((define-specifier-tag ',tag-name nil
#'(lambda (charset)
(string-match ,regex
(symbol-name (charset-name charset)))))
(set-face-font 'default
(fc-name-unparse
(fc-font-match
(selected-device)
(fc-name-parse ,(format "-%d:lang=%s" size tag-name)))
nil '(x ,tag-name) 'append)))))
tag-details))))
(define-tags-and-set-faces
(zh-tw "^chinese-\\(big5\\|cns\\)" 18)
(zh "^chinese-" 18)
(ja "^\\(japanese\\|katakana\\)-" 18)
(ko "^korean-" 18)
(am "^ethiopic-" 18)
(vi "^vietnamese-" 14)
(el "^greek-" 12)
(ru "^cyrillic-" 12)
(hu "^latin-iso8859-2" 12)
(ar "^arabic-" 16)
(lo "^lao" 14)
(he "^hebrew" 11.5)
(th "^thai" 14))))
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta