comparison lisp/mule/thai-xtis.el @ 3659:98af8a976fc3

[xemacs-hg @ 2006-11-05 22:31:31 by aidan] Support specifying fonts for particular character sets in Mule; support translation to ISO 10646-1 for Mule character sets without an otherwise matching font; move to a vector of X11-charset-X11-registry instead of a regex for the charset-registry property.
author aidan
date Sun, 05 Nov 2006 22:31:46 +0000
parents 578cb2932d72
children 1d74a1d115ee
comparison
equal deleted inserted replaced
3658:0db1aaedbbef 3659:98af8a976fc3
33 ;; Virach Sornlertlamvanich <virach@links.nectec.or.th> is supported. 33 ;; Virach Sornlertlamvanich <virach@links.nectec.or.th> is supported.
34 34
35 ;;; Code: 35 ;;; Code:
36 36
37 (make-charset 'thai-xtis "Precomposed Thai (XTIS by Virach)." 37 (make-charset 'thai-xtis "Precomposed Thai (XTIS by Virach)."
38 '(registry "xtis-0" 38 '(registries ["xtis-0"]
39 dimension 2 39 dimension 2
40 columns 1 40 columns 1
41 chars 94 41 chars 94
42 final ?? 42 final ??
43 graphic 0)) 43 graphic 0))
44 44
45 (define-category ?x "Precomposed Thai character.") 45 (define-category ?x "Precomposed Thai character.")
46 (modify-category-entry 'thai-xtis ?x) 46 (modify-category-entry 'thai-xtis ?x)
47 47
48 (when (featurep 'xemacs) 48 (when (featurep 'xemacs)