diff options
| author | Kenichi Handa <handa@m17n.org> | 1997-04-05 02:35:53 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1997-04-05 02:35:53 +0000 |
| commit | 2aa72de7912eb6f93afd27a15b695434fca85c56 (patch) | |
| tree | 09d33554389dd0083df0e6a76b8eb86e95ea2a8c /lisp/international/mule-conf.el | |
| parent | 4366b45eccfcb09f265e7beb8dcf72352e47768f (diff) | |
| download | emacs-2aa72de7912eb6f93afd27a15b695434fca85c56.tar.gz | |
Change descriptions for Arabic, Indian, and
Vietnamese character sets. Define Tibetan character sets.
Diffstat (limited to 'lisp/international/mule-conf.el')
| -rw-r--r-- | lisp/international/mule-conf.el | 20 |
1 files changed, 13 insertions, 7 deletions
diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el index 883254dba29..203bf001eec 100644 --- a/lisp/international/mule-conf.el +++ b/lisp/international/mule-conf.el @@ -121,20 +121,20 @@ ;; character set, it is divided into two: lower case letters and upper ;; case letters. (define-charset nil 'vietnamese-viscii-lower - [1 96 1 0 ?1 1 "VISCII" "VISCII lower-case" "VISCII1.1 lower-case"]) + [1 96 1 0 ?1 1 "VISCII lower" "VISCII lower-case" "VISCII1.1 lower-case"]) (define-charset nil 'vietnamese-viscii-upper - [1 96 1 0 ?2 1 "VISCII" "VISCII upper-case" "VISCII1.1 upper-case"]) + [1 96 1 0 ?2 1 "VISCII upper" "VISCII upper-case" "VISCII1.1 upper-case"]) ;; For Arabic, we need three different types of character sets. ;; Digits are of direction left-to-right and of width 1-column. ;; Others are of direction right-to-left and of width 1-column or ;; 2-column. (define-charset nil 'arabic-digit - [1 94 1 0 ?2 0 "Arabic" "Arabic digit" "Arabic digit"]) + [1 94 1 0 ?2 0 "Arabic digit" "Arabic digit" "Arabic digit"]) (define-charset nil 'arabic-1-column - [1 94 1 1 ?3 0 "Arabic" "Arabic 1-column" "Arabic 1-column"]) + [1 94 1 1 ?3 0 "Arabic 1-col" "Arabic 1-column" "Arabic 1-column"]) (define-charset nil 'arabic-2-column - [1 94 2 1 ?4 0 "Arabic" "Arabic 2-column" "Arabic 2-column"]) + [1 94 2 1 ?4 0 "Arabic 2-col" "Arabic 2-column" "Arabic 2-column"]) ;; Ethiopic characters (Amahric and Tigrigna). (define-charset nil 'ethiopic @@ -173,11 +173,11 @@ "Generic Indian charset for data exchange with IS 13194"]) ;; Actual Glyph for 2-column width. (define-charset nil 'indian-2-column - [2 94 2 0 ?5 0 "Indian" "Indian 2 Column" + [2 94 2 0 ?5 0 "Indian 2-col" "Indian 2 Column" "Indian charset for 2-column width glyphs"]) ;; Actual Glyph for 1-column width. (define-charset nil 'indian-1-column - [2 94 1 0 ?6 0 "Indian" "Indian 1 Column" + [2 94 1 0 ?6 0 "Indian 1-col" "Indian 1 Column" "Indian charset for 2-column width glypps"]) ;; Lao script. @@ -185,6 +185,12 @@ (define-charset nil 'lao [1 94 1 0 ?1 0 "Lao" "Lao" "Lao characters (ISO10646 0E80..0EDF)"]) +;; Tibetan script. +(define-charset nil 'tibetan + [2 94 2 0 ?7 0 "Tibetan 2-col" "Tibetan 2 column" "Tibetan characters"]) +(define-charset nil 'tibetan-1-column + [2 94 1 0 ?8 0 "Tibetan 1-col" "Tibetan 1 column" "Tibetan 1 column glyph"]) + ;; This is a table of alternate charsets. (setq alternate-charset-table |