1 |
;;; thai.el --- support for Thai -*- coding: iso-2022-7bit; -*- |
;;; thai.el --- support for Thai -*- coding: iso-2022-7bit; no-byte-compile: t -*- |
2 |
|
|
3 |
;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. |
;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. |
4 |
;; Licensed to the Free Software Foundation. |
;; Licensed to the Free Software Foundation. |
32 |
'thai-tis620 2 ?T |
'thai-tis620 2 ?T |
33 |
"8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)." |
"8-bit encoding for ASCII (MSB=0) and Thai TIS620 (MSB=1)." |
34 |
'(ascii thai-tis620 nil nil |
'(ascii thai-tis620 nil nil |
35 |
nil ascii-eol) |
nil nil nil nil nil nil nil nil nil nil nil t) |
36 |
'((safe-charsets ascii thai-tis620) |
'((safe-charsets ascii thai-tis620) |
37 |
|
(mime-charset . tis-620) |
38 |
(post-read-conversion . thai-post-read-conversion))) |
(post-read-conversion . thai-post-read-conversion))) |
39 |
|
|
40 |
(define-coding-system-alias 'th-tis620 'thai-tis620) |
(define-coding-system-alias 'th-tis620 'thai-tis620) |
50 |
(input-method . "thai-kesmanee") |
(input-method . "thai-kesmanee") |
51 |
(unibyte-display . thai-tis620) |
(unibyte-display . thai-tis620) |
52 |
(features thai-util) |
(features thai-util) |
53 |
(sample-text |
(sample-text |
54 |
. (thai-compose-string |
. (thai-compose-string |
55 |
(copy-sequence "Thai (,T@RIRd7B(B) ,TJ0GQ1J04U1$0CQ1:(B, ,TJ0GQ1J04U10$h1P(B"))) |
(copy-sequence "Thai (,T@RIRd7B(B) ,TJ0GQ1J04U1$0CQ1:(B, ,TJ0GQ1J04U10$h1P(B"))) |
56 |
(documentation . t))) |
(documentation . t))) |