Mercurial > hg > xemacs-beta
comparison lisp/language/arabic.el @ 167:85ec50267440 r20-3b10
Import from CVS: tag r20-3b10
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:45:46 +0200 |
parents | 5a88923fcbfe |
children | e45d5e7c476e |
comparison
equal
deleted
inserted
replaced
166:7a77eb660975 | 167:85ec50267440 |
---|---|
26 ;; Synched up with: Mule 2.3. | 26 ;; Synched up with: Mule 2.3. |
27 | 27 |
28 ;;; Code: | 28 ;;; Code: |
29 | 29 |
30 ;; Three character sets for Arabic | 30 ;; Three character sets for Arabic |
31 (make-charset 'arabic-0 "Arabic digits" | 31 (make-charset 'arabic-digit "Arabic digits" |
32 '(registry "MuleArabic-0" | 32 '(registry "MuleArabic-0" |
33 dimension 1 | 33 dimension 1 |
34 chars 94 | 34 chars 94 |
35 final ?2 | 35 final ?2 |
36 graphic 0 | 36 graphic 0 |
37 direction l2r | 37 direction l2r |
38 )) | 38 )) |
39 | 39 |
40 (make-charset 'arabic-1 "one-column Arabic" | 40 (make-charset 'arabic-1-column "Arabic 1-column" |
41 '(registry "MuleArabic-1" | 41 '(registry "MuleArabic-1" |
42 dimension 1 | 42 dimension 1 |
43 chars 94 | 43 chars 94 |
44 final ?3 | 44 final ?3 |
45 graphic 0 | 45 graphic 0 |
46 direction r2l | 46 direction r2l |
47 )) | 47 )) |
48 | 48 |
49 (make-charset 'arabic-2 "two-column Arabic" | 49 (make-charset 'arabic-2-column "Arabic 2-column" |
50 '(registry "MuleArabic-2" | 50 '(registry "MuleArabic-2" |
51 dimension 1 | 51 dimension 1 |
52 chars 94 | 52 chars 94 |
53 final ?4 | 53 final ?4 |
54 graphic 0 | 54 graphic 0 |