[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: proper setting of default font (and string-handling in elisp?)
From: |
Peter Dyballa |
Subject: |
Re: proper setting of default font (and string-handling in elisp?) |
Date: |
Wed, 26 Aug 2009 15:45:47 +0200 |
Am 26.08.2009 um 14:59 schrieb Tom Roche:
* font syntax: how to translate the font spec format that works for
set-frame-font (e.g. "Courier 10 Pitch-9") to that used for
initial-frame-alist and default-frame-alist (e.g.
"fontset-10pt_lucidatypewriter")?
I've created font sets to span (almost) the whole Unicode BMP (Basic
Multilingual Plane):
(create-fontset-from-fontset-spec "-b&h-lucidatypewriter-medium-
r-*-*-10-*-*-*-*-*-fontset-10pt_lucidatypewriter" t 'noerror)
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-1 '("lucidatypewriter" . "iso8859-1"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-2 '("lucidatypewriter" . "iso8859-2"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-3 '("lucidatypewriter" . "iso8859-3"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-4 '("lucidatypewriter" . "iso8859-4"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-9 '("lucidatypewriter" . "iso8859-9"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-14 '("lucidatypewriter" . "iso8859-14"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'latin-
iso8859-15 '("lucidatypewriter" . "iso8859-15"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'mule-
unicode-0100-24ff '("lucidatypewriter" . "iso10646-1"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'mule-
unicode-2500-33ff '("lucidatypewriter" . "iso10646-1"))
(set-fontset-font "fontset-10pt_lucidatypewriter" 'mule-unicode-e000-
ffff '("lucidatypewriter" . "iso10646-1"))
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0590) (decode-char 'ucs #x05ff)) '("bpg glaho arial" .
"iso10646-1")) ; Hebrew
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0600) (decode-char 'ucs #x06ff)) '("bpg glaho arial" .
"iso10646-1")) ; Arabic
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x10a0) (decode-char 'ucs #x10ff)) '("bpg glaho" .
"iso10646-1")) ; Georgian
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x2800) (decode-char 'ucs #x28ff)) '("code2000" .
"iso10646-1")) ; Braille
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0980) (decode-char 'ucs #x09ff)) '("bangla" . "iso10646-1")) ;
Bengali
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0a00) (decode-char 'ucs #x0a7f)) '("code2000" .
"iso10646-1")) ; Gurmukhi
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0a80) (decode-char 'ucs #x0aff)) '("code2000" .
"iso10646-1")) ; Gujarati
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0b00) (decode-char 'ucs #x0b7f)) '("code2000" .
"iso10646-1")) ; Oriya
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0b80) (decode-char 'ucs #x0bff)) '("code2000" .
"iso10646-1")) ; Tamil
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0c00) (decode-char 'ucs #x0c7f)) '("code2000" .
"iso10646-1")) ; Telugu
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0c80) (decode-char 'ucs #x0cff)) '("code2000" .
"iso10646-1")) ; Kannada
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0d00) (decode-char 'ucs #x0d7f)) '("code2000" .
"iso10646-1")) ; Malayalam
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0d80) (decode-char 'ucs #x0dff)) '("akshar unicode" .
"iso10646-1")) ; Sinhala
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0e00) (decode-char 'ucs #x0e7f)) '("code2000" .
"iso10646-1")) ; Thai
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0e80) (decode-char 'ucs #x0eff)) '("code2000" .
"iso10646-1")) ; Lao
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons (decode-char
'ucs #x0f00) (decode-char 'ucs #x0fff)) '("xtashi" . "iso10646-1")) ;
Tibetan
(when (= 23 ETyp) ; ETyp is approximately emacs-major-version
(set-fontset-font "fontset-10pt_lucidatypewriter" (cons
(decode-char 'ucs #x1d400) (decode-char 'ucs #x1d7ff)) '("code2001" .
"iso10646-1")) ; Mathe
(set-fontset-font "fontset-10pt_lucidatypewriter" '(#x1D400 .
#x1D7FF) (font-spec :family "Unicode Symbols") nil)
)
This font set name can also be used as an initial parameter on the
command line or as an X resource.
(font . tlr-default-font)
should work. By quoting the variable you make the variable's name
(and not its contents) available.
--
Greetings
Pete
Time is an illusion. Lunchtime, doubly so.