Mercurial > emacs
annotate lisp/language/tai-viet.el @ 93525:26506821c407
(list-yahrzeit-dates): Expand calendar-for-loop call.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Wed, 02 Apr 2008 03:17:21 +0000 |
parents | 7599e146f01b |
children | 55b7f25d920a |
rev | line source |
---|---|
90939 | 1 ;;; tai-viet.el --- support for Tai Viet -*- coding: utf-8; no-byte-compile: t -*- |
2 | |
91436
7599e146f01b
Update copyright years and GPL version.
Glenn Morris <rgm@gnu.org>
parents:
90950
diff
changeset
|
3 ;; Copyright (C) 2007, 2008 |
90939 | 4 ;; National Institute of Advanced Industrial Science and Technology (AIST) |
5 ;; Registration Number H13PRO009 | |
91436
7599e146f01b
Update copyright years and GPL version.
Glenn Morris <rgm@gnu.org>
parents:
90950
diff
changeset
|
6 ;; Copyright (C) 2007, 2008 Free Software Foundation, Inc. |
90939 | 7 |
8 ;; Keywords: multilingual, Tai Viet, i18n | |
9 | |
10 ;; This file is part of GNU Emacs. | |
11 | |
12 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
13 ;; it under the terms of the GNU General Public License as published by | |
91436
7599e146f01b
Update copyright years and GPL version.
Glenn Morris <rgm@gnu.org>
parents:
90950
diff
changeset
|
14 ;; the Free Software Foundation; either version 3, or (at your option) |
90939 | 15 ;; any later version. |
16 | |
17 ;; GNU Emacs is distributed in the hope that it will be useful, | |
18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
20 ;; GNU General Public License for more details. | |
21 | |
22 ;; You should have received a copy of the GNU General Public License | |
23 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
24 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, | |
25 ;; Boston, MA 02110-1301, USA. | |
26 | |
27 ;;; Commentary: | |
28 | |
29 ;; Tai Viet is being included in the Unicode at the range U+AA80..U+AADF. | |
30 | |
31 ;;; Code: | |
32 | |
33 (set-char-table-range composition-function-table | |
34 '(#xAA80 . #xAADF) | |
35 'tai-viet-composition-function) | |
36 | |
37 (set-language-info-alist | |
38 "TaiViet" '((charset unicode) | |
39 (coding-system utf-8) | |
40 (coding-priority utf-8) | |
41 (input-method . "tai-sonla") | |
42 (sample-text | |
43 "TaiViet (ꪁꪫꪱꪣ ꪽꪕ)\t\tꪅꪰꪙ ꪨꪮ ꪁꪫꪱ / ꪅꪾ ꪨ� ꪁꪫꪱ") | |
44 (documentation . "\ | |
45 TaiViet refers to the Tai language used by Tai people in | |
46 Vietnam, and also refers to the script used for this language. | |
47 Both the script and language have the same origin as that of Thai | |
48 language/script used in Thailand, but now they differ from each | |
49 other in a significant way (especially the scripts are). | |
50 | |
51 The language name is spelled as \"ꪁꪫꪱꪣ ꪽꪕ\", and the script name is | |
52 spelled as \"ꪎ� ꪽꪕ\" in the modern form, \"ꪎꪴ ꪽꪕ\" in the traditional | |
53 from. | |
54 | |
55 As the proposal for TaiViet script to the Unicode is still on | |
56 the progress, we use the Private Use Area for TaiViet | |
57 characters (U+F000..U+F07E). A TaiViet font encoded accordingly | |
58 is available at this web page: | |
59 http://www.m17n.org/TaiViet/ | |
60 "))) | |
61 | |
62 (provide 'tai-viet) | |
63 | |
64 ;; Local Variables: | |
65 ;; coding: utf-8 | |
66 ;; End: | |
90950 | 67 |
68 ;; arch-tag: db4e3377-2ba7-47a0-b173-e44420d540c3 |