Commit | Line | Data |
---|---|---|
9d5bc830 KH |
1 | ;;; khmer.el --- support for Khmer -*- coding: utf-8; no-byte-compile: t -*- |
2 | ||
3 | ;; Copyright (C) 2008 | |
4 | ;; National Institute of Advanced Industrial Science and Technology (AIST) | |
5 | ;; Registration Number H13PRO009 | |
6 | ||
7 | ;; Keywords: multilingual, Khmer, i18n | |
8 | ||
9 | ;; This file is part of GNU Emacs. | |
10 | ||
11 | ;; GNU Emacs is free software; you can redistribute it and/or modify | |
12 | ;; it under the terms of the GNU General Public License as published by | |
13 | ;; the Free Software Foundation; either version 3, or (at your option) | |
14 | ;; any later version. | |
15 | ||
16 | ;; GNU Emacs is distributed in the hope that it will be useful, | |
17 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 | ;; GNU General Public License for more details. | |
20 | ||
21 | ;; You should have received a copy of the GNU General Public License | |
22 | ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
23 | ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, | |
24 | ;; Boston, MA 02110-1301, USA. | |
25 | ||
26 | ;;; Code: | |
27 | ||
28 | (set-language-info-alist | |
29 | "Khmer" '((charset unicode) | |
30 | (coding-system utf-8) | |
31 | (coding-priority utf-8) | |
32 | (sample-text . "Khmer (ភាសាខ្មែរ) ជំរាបសួរ") | |
33 | (documentation . t))) | |
34 | ||
35 | (let ((val '(("[\x1780-\x17FF\x19E0-\x19FF\x200C\x200D]+" . font-shape-text)))) | |
36 | (set-char-table-range composition-function-table '(#x1780 . #x17FF) val) | |
37 | (set-char-table-range composition-function-table '(#x19E0 . #x19FF) val)) | |
b2ec310c MB |
38 | |
39 | ;; arch-tag: 032890e4-a936-4584-ad44-79eb5f8bc98e |