Commit 4b725a70 authored by Paul Eggert's avatar Paul Eggert

Use UTF-8 for most files with non-ASCII characters.

* admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el)
(leim/quail/hanja3.el, leim/quail/symbol-ksc.el):
Now utf-8, not iso-2022-7bit.  Also, files that contain non-UTF-8
characters are now encoded in utf-8-emacs, not iso-2022-7bit.
* etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th:
Switch from iso-2022-7bit to utf-8.
* leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el:
* leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el:
* leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el:
* leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el:
* leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el:
* leim/quail/vnvni.el, leim/quail/welsh.el:
* lisp/international/latin1-disp.el, lisp/international/mule-util.el:
* lisp/language/cyril-util.el, lisp/language/european.el:
* lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el:
* lisp/language/tibet-util.el, lisp/language/tibetan.el:
* lisp/language/viet-util.el:
Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs.

Fixes: debbugs:13936
parent 54451ffa
2013-04-01 Paul Eggert <eggert@cs.ucla.edu>
Use UTF-8 for most files with non-ASCII characters (Bug#13936).
* notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el)
(leim/quail/hanja3.el, leim/quail/symbol-ksc.el):
Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8
characters are now encoded in utf-8-emacs, not iso-2022-7bit.
2013-03-18 Paul Eggert <eggert@cs.ucla.edu>
* notes/unicode: Mention some more iso-2022-7bit files (Bug#13936).
......
......@@ -201,15 +201,11 @@ nontrivial changes to the build process.
operating in some other language environment.
etc/tutorials/TUTORIAL.ja
etc/tutorials/TUTORIAL.ko
leim/quail/cyril-jis.el
leim/quail/hanja-jis.el
leim/quail/hanja.el
leim/quail/hanja3.el
leim/quail/japanese.el
leim/quail/py-punct.el
leim/quail/pypunct-b5.el
leim/quail/symbol-ksc.el
lisp/international/ja-dic-cnv.el
lisp/international/ja-dic-utl.el
lisp/international/kinsoku.el
......@@ -219,6 +215,8 @@ nontrivial changes to the build process.
lisp/language/japanese.el
lisp/term/x-win.el
* utf-8-emacs
These files contain characters that cannot be encoded in UTF-8.
leim/quail/tibetan.el
......
2013-04-01 Paul Eggert <eggert@cs.ucla.edu>
Use UTF-8 for most files with non-ASCII characters (Bug#13936).
* tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th:
Switch from iso-2022-7bit to utf-8.
2013-03-30 Leo Liu <sdl.web@gmail.com>
* NEWS: Mention `kmacro-to-register' and new eldoc feature.
......
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
2013-03-20 Paul Eggert <eggert@cs.ucla.edu>
2013-04-01 Paul Eggert <eggert@cs.ucla.edu>
Use UTF-8 for most files with non-ASCII characters (Bug#13936).
* quail/cyrillic.el, quail/czech.el, quail/ethiopic.el:
* quail/greek.el, quail/hanja.el, quail/hanja3.el, quail/hebrew.el:
* quail/lao.el, quail/lrt.el, quail/slovak.el, quail/symbol-ksc.el:
* quail/thai.el, quail/tibetan.el, quail/viqr.el, quail/vntelex.el:
* quail/vnvni.el, quail/welsh.el:
Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs.
2013-03-18 Paul Eggert <eggert@cs.ucla.edu>
* Makefile.in ($(srcdir)/ja-dic/ja-dic.el): Use batch-skkdic-convert.
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
;;; lao.el --- Quail package for inputting Lao characters -*-coding: iso-2022-7bit;-*-
;;; lao.el --- Quail package for inputting Lao characters -*-coding: utf-8;-*-
;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
;; 2006, 2007, 2008, 2009, 2010, 2011
......@@ -48,104 +48,104 @@
("#" . "3")
("$" . "4")
("&" . "5")
("%" . "(1l(B")
("'" . "(1'(B")
("%" . "")
("'" . "")
("(" . "7")
(")" . "8")
("*" . "6")
("+" . ["(1mh(B"])
("," . "(1A(B")
("-" . "(1*(B")
("." . "(1c(B")
("/" . "(1=(B")
("0" . "(1"(B")
("1" . "(1B(B")
("2" . "(1?(B")
("3" . "(1b(B")
("4" . "(16(B")
("5" . "(1X(B")
("6" . "(1Y(B")
("7" . "(1$(B")
("8" . "(15(B")
("9" . "(1((B")
("+" . ["ໍ່"])
("," . "")
("-" . "")
("." . "")
("/" . "")
("0" . "")
("1" . "")
("2" . "")
("3" . "")
("4" . "")
("5" . "")
("6" . "")
("7" . "")
("8" . "")
("9" . "")
(":" . "%")
(";" . "(1G(B")
("<" . "(1}(B")
("=" . "(1m(B")
(";" . "")
("<" . "")
("=" . "")
(">" . "$")
("?" . ")")
("@" . "2")
("A" . ["(1Qi(B"])
("B" . ["(1Vi(B"])
("C" . "(1O(B")
("A" . ["ັ້"])
("B" . ["ຶ້"])
("C" . "")
("D" . ".")
("E" . ["(1Si(B"])
("E" . ["ຳ້"])
("F" . ",")
("G" . ":")
("H" . "(1j(B")
("I" . "(1N(B")
("J" . "(1k(B")
("H" . "")
("I" . "")
("J" . "")
("K" . "!")
("L" . "?")
("M" . "(1f(B")
("N" . ["(1Wi(B"])
("O" . "(1|(B")
("P" . "(1](B")
("Q" . ["(1[i(B"])
("M" . "")
("N" . ["ື້"])
("O" . "")
("P" . "")
("Q" . ["ົ້"])
("R" . "_")
("S" . ";")
("T" . "+")
("U" . ["(1Ui(B"])
("U" . ["ີ້"])
("V" . "x")
("W" . "0")
("X" . "(")
("Y" . ["(1Ti(B"])
("Y" . ["ິ້"])
("Z" . "\"")
("[" . "(1:(B")
("]" . "(1E(B")
("^" . "(1\(B")
("[" . "")
("]" . "")
("^" . "")
("_" . "9")
("`" . "(1'(B")
("a" . "(1Q(B")
("b" . "(1V(B")
("c" . "(1a(B")
("d" . "(1!(B")
("e" . "(1S(B")
("f" . "(14(B")
("g" . "(1`(B")
("h" . "(1i(B")
("i" . "(1C(B")
("j" . "(1h(B")
("k" . "(1R(B")
("l" . "(1J(B")
("m" . "(17(B")
("n" . "(1W(B")
("o" . "(19(B")
("p" . "(1-(B")
("q" . "(1[(B")
("r" . "(1>(B")
("s" . "(1K(B")
("t" . "(1P(B")
("u" . "(1U(B")
("v" . "(1M(B")
("w" . "(1d(B")
("x" . "(1;(B")
("y" . "(1T(B")
("z" . "(1<(B")
("`" . "")
("a" . "")
("b" . "")
("c" . "")
("d" . "")
("e" . "")
("f" . "")
("g" . "")
("h" . "")
("i" . "")
("j" . "")
("k" . "")
("l" . "")
("m" . "")
("n" . "")
("o" . "")
("p" . "")
("q" . "")
("r" . "")
("s" . "")
("t" . "")
("u" . "")
("v" . "")
("w" . "")
("x" . "")
("y" . "")
("z" . "")
("{" . "-")
("|" . ["(1K\(B"])
("|" . ["ຫຼ"])
("}" . "/")
("~" . "(1l(B")
("\\0" . "(1p(B")
("\\1" . "(1q(B")
("\\2" . "(1r(B")
("\\3" . "(1s(B")
("\\4" . "(1t(B")
("\\5" . "(1u(B")
("\\6" . "(1v(B")
("\\7" . "(1w(B")
("\\8" . "(1x(B")
("\\9" . "(1y(B")
("~" . "")
("\\0" . "")
("\\1" . "")
("\\2" . "")
("\\3" . "")
("\\4" . "")
("\\5" . "")
("\\6" . "")
("\\7" . "")
("\\8" . "")
("\\9" . "")
)
"Alist of key sequences vs the corresponding Lao string to input.
This variable is for the input method \"lao\".
......@@ -155,7 +155,7 @@ you need to re-load it to properly re-initialize related alists.")
;; Temporary variable to initialize lao-consonant-key-alist, etc.
(defconst lao-key-alist-vector
(let ((tail lao-key-alist)
consonant-key-alist semivowel-key-alist vowel-key-alist
consonant-key-alist semivowel-key-alist vowel-key-alist
voweltone-key-alist tone-key-alist other-key-alist
elt phonetic-type)
(while tail
......@@ -178,7 +178,7 @@ you need to re-load it to properly re-initialize related alists.")
(setq semivowel-key-alist (cons elt semivowel-key-alist)))
(t
(setq other-key-alist (cons elt other-key-alist)))))
(vector consonant-key-alist semivowel-key-alist vowel-key-alist
(vector consonant-key-alist semivowel-key-alist vowel-key-alist
voweltone-key-alist tone-key-alist other-key-alist)))
(defconst lao-consonant-key-alist (aref lao-key-alist-vector 0))
......@@ -192,7 +192,7 @@ you need to re-load it to properly re-initialize related alists.")
(makunbound 'lao-key-alist-vector)
(quail-define-package
"lao" "Lao" "(1E(B" t
"lao" "Lao" "" t
"Lao input method simulating Lao keyboard layout based on Thai TIS620"
nil t t t t nil nil nil 'quail-lao-update-translation nil t)
......
;;; lrt.el --- Quail package for inputting Lao characters by LRT method -*-coding: iso-2022-7bit;-*-
;;; lrt.el --- Quail package for inputting Lao characters by LRT method -*-coding: utf-8;-*-
;; Copyright (C) 1998, 2001-2013 Free Software Foundation, Inc.
;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
......@@ -52,11 +52,11 @@
(quail-define-package
"lao-lrt" "Lao" "(1E(BR" t
"lao-lrt" "Lao" "R" t
"Lao input method using LRT (Lao Roman Transcription).
`\\' (backslash) + number-key => (1p(B,(1q(B,(1r(B,... LAO DIGIT ZERO, ONE, TWO, ...
`\\' (backslash) + `\\' => (1f(B LAO KO LA (REPETITION)
`\\' (backslash) + `$' => (1O(B LAO ELLIPSIS
`\\' (backslash) + number-key => ໐,໑,໒,... LAO DIGIT ZERO, ONE, TWO, ...
`\\' (backslash) + `\\' => LAO KO LA (REPETITION)
`\\' (backslash) + `$' => LAO ELLIPSIS
"
nil 'forget-last-selection 'deterministic 'kbd-translate 'show-layout
nil nil nil 'quail-lao-update-translation nil t)
......
This diff is collapsed.
This diff is collapsed.
;;; thai.el --- Quail package for inputting Thai characters -*-coding: iso-2022-7bit;-*-
;;; thai.el --- Quail package for inputting Thai characters -*-coding: utf-8;-*-
;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005, 2006, 2007, 2008, 2009, 2010, 2011
......@@ -42,13 +42,13 @@
;; Thai Kesmanee keyboard support.
(quail-define-package
"thai-kesmanee" "Thai" ",T!!(B>" t
"thai-kesmanee" "Thai" "กก>" t
"Thai Kesmanee input method with TIS620 keyboard layout
The difference from the ordinal Thai keyboard:
',T_(B' and ',To(B' are assigned to '\\' and '|' respectively,
',T#(B' and ',T%(B' are assigned to '`' and '~' respectively,
Don't know where to assign characters ',Tz(B' and ',T{(B'."
'฿' and '๏' are assigned to '\\' and '|' respectively,
'ฃ' and 'ฅ' are assigned to '`' and '~' respectively,
Don't know where to assign characters '๚' and '๛'."
nil t t t t nil nil nil nil nil t)
(thai-generate-quail-map
......@@ -56,38 +56,38 @@ The difference from the ordinal Thai keyboard:
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ; control codes
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ; control codes
;; This data is quite old.
;; 0 "#" "." ",Tr(B" ",Ts(B" ",Tt(B" ",TQi(B" ",T'(B" ; SPC .. '
;; ",Tv(B" ",Tw(B" ",Tu(B" ",Ty(B" ",TA(B" ",T"(B" ",Tc(B" ",T=(B" ; ( .. /
;; ",T((B" ",TE(B" "/" "_" ",T@(B" ",T6(B" ",TX(B" ",TV(B" ; 0 .. 7
;; ",T$(B" ",T5(B" ",T+(B" ",TG(B" ",T2(B" ",T*(B" ",TL(B" ",TF(B" ; 8 .. ?
;; ",Tq(B" ",TD(B" ",TZ(B" ",T)(B" ",T/(B" ",T.(B" ",Tb(B" ",T,(B" ; @ .. G
;; ",Tg(B" ",T3(B" ",Tk(B" ",TI(B" ",TH(B" ",Tn(B" ",Tl(B" ",TO(B" ; H .. O
;; ",T-(B" ",Tp(B" ",T1(B" ",T&(B" ",T8(B" ",Tj(B" ",TN(B" "\"" ; P .. W
;; ")" ",Tm(B" "(" ",T:(B" ",T_(B" ",TE(B" ",TY(B" ",Tx(B" ; X .. _
;; ",T#(B" ",T?(B" ",TT(B" ",Ta(B" ",T!(B" ",TS(B" ",T4(B" ",T`(B" ; ` .. g
;; ",Ti(B" ",TC(B" ",Th(B" ",TR(B" ",TJ(B" ",T7(B" ",TW(B" ",T9(B" ; h .. o
;; ",TB(B" ",Tf(B" ",T>(B" ",TK(B" ",TP(B" ",TU(B" ",TM(B" ",Td(B" ; p .. w
;; ",T;(B" ",TQ(B" ",T<(B" ",T0(B" ",To(B" "," ",T%(B" 0 ; x .. DEL
;; 0 "#" "." "๒" "๓" "๔" "ั้" "ง" ; SPC .. '
;; "๖" "๗" "๕" "๙" "ม" "ข" "ใ" "ฝ" ; ( .. /
;; "จ" "ล" "/" "_" "ภ" "ถ" "ุ" "ึ" ; 0 .. 7
;; "ค" "ต" "ซ" "ว" "ฒ" "ช" "ฬ" "ฦ" ; 8 .. ?
;; "๑" "ฤ" "ฺ" "ฉ" "ฏ" "ฎ" "โ" "ฌ" ; @ .. G
;; "็" "ณ" "๋" "ษ" "ศ" "๎" "์" "ฯ" ; H .. O
;; "ญ" "๐" "ฑ" "ฆ" "ธ" "๊" "ฮ" "\"" ; P .. W
;; ")" "ํ" "(" "บ" "฿" "ล" "ู" "๘" ; X .. _
;; "ฃ" "ฟ" "ิ" "แ" "ก" "ำ" "ด" "เ" ; ` .. g
;; "้" "ร" "่" "า" "ส" "ท" "ื" "น" ; h .. o
;; "ย" "ๆ" "พ" "ห" "ะ" "ี" "อ" "ไ" ; p .. w
;; "ป" "ั" "ผ" "ฐ" "๏" "," "ฅ" 0 ; x .. DEL
;; This is the correct data nowadays.
0 "+" "." ",Tr(B" ",Ts(B" ",Tt(B" ",T_(B" ",T'(B" ; SPC .. '
",Tv(B" ",Tw(B" ",Tu(B" ",Ty(B" ",TA(B" ",T"(B" ",Tc(B" ",T=(B" ; ( .. /
",T((B" ",Te(B" "/" "-" ",T@(B" ",T6(B" ",TX(B" ",TV(B" ; 0 .. 7
",T$(B" ",T5(B" ",T+(B" ",TG(B" ",T2(B" ",T*(B" ",TL(B" ",TF(B" ; 8 .. ?
",Tq(B" ",TD(B" ",TZ(B" ",T)(B" ",T/(B" ",T.(B" ",Tb(B" ",T,(B" ; @ .. G
",Tg(B" ",T3(B" ",Tk(B" ",TI(B" ",TH(B" "?" ",Tl(B" ",TO(B" ; H .. O
",T-(B" ",Tp(B" ",T1(B" ",T&(B" ",T8(B" ",Tj(B" ",TN(B" "\"" ; P .. W
"\)" ",Tm(B" "\(" ",T:(B" ",T#(B" ",TE(B" ",TY(B" ",Tx(B" ; X .. _
"_" ",T?(B" ",TT(B" ",Ta(B" ",T!(B" ",TS(B" ",T4(B" ",T`(B" ; ` .. g
",Ti(B" ",TC(B" ",Th(B" ",TR(B" ",TJ(B" ",T7(B" ",TW(B" ",T9(B" ; h .. o
",TB(B" ",Tf(B" ",T>(B" ",TK(B" ",TP(B" ",TU(B" ",TM(B" ",Td(B" ; p .. w
",T;(B" ",TQ(B" ",T<(B" ",T0(B" ",T%(B" "," "%" 0 ; x .. DEL
0 "+" "." "๒" "๓" "๔" "฿" "ง" ; SPC .. '
"๖" "๗" "๕" "๙" "ม" "ข" "ใ" "ฝ" ; ( .. /
"จ" "ๅ" "/" "-" "ภ" "ถ" "ุ" "ึ" ; 0 .. 7
"ค" "ต" "ซ" "ว" "ฒ" "ช" "ฬ" "ฦ" ; 8 .. ?
"๑" "ฤ" "ฺ" "ฉ" "ฏ" "ฎ" "โ" "ฌ" ; @ .. G
"็" "ณ" "๋" "ษ" "ศ" "?" "์" "ฯ" ; H .. O
"ญ" "๐" "ฑ" "ฆ" "ธ" "๊" "ฮ" "\"" ; P .. W
"\)" "ํ" "\(" "บ" "ฃ" "ล" "ู" "๘" ; X .. _
"_" "ฟ" "ิ" "แ" "ก" "ำ" "ด" "เ" ; ` .. g
"้" "ร" "่" "า" "ส" "ท" "ื" "น" ; h .. o
"ย" "ๆ" "พ" "ห" "ะ" "ี" "อ" "ไ" ; p .. w
"ป" "ั" "ผ" "ฐ" "ฅ" "," "%" 0 ; x .. DEL
])
;; Thai Pattachote keyboard support.
(quail-define-package
"thai-pattachote" "Thai" ",T!;(B>" t
"thai-pattachote" "Thai" "กป>" t
"Thai Pattachote input method with TIS620 keyboard layout"
nil t t t t nil nil nil nil nil t)
......@@ -95,18 +95,18 @@ The difference from the ordinal Thai keyboard:
[
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ; control codes
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ; control codes
0 "+" ",T1(B" "/" "," "?" "_" ",T"(B" ; SPC .. '
"(" ")" "." "%" ",TP(B" ",Tq(B" ",T((B" ",T>(B" ; ( .. /
",Tp(B" "=" ",Tr(B" ",Ts(B" ",Tt(B" ",Tu(B" ",TY(B" ",Tw(B" ; 0 .. 7
",Tx(B" ",Ty(B" ",T&(B" ",Td(B" ",T?(B" ",Tv(B" ",T2(B" ",TL(B" ; 8 .. ?
"\"" ",Tk(B" ",TQ(B" ",T0(B" ",TS(B" ",Tf(B" ",T3(B" ",Tl(B" ; @ .. G
",TW(B" ",T+(B" ",T<(B" ",T*(B" ",Tb(B" ",TN(B" ",TH(B" ",T6(B" ; H .. O
",T2(B" ",Tj(B" ",T-(B" ",T8(B" ",TI(B" ",T=(B" ",T@(B" ",TD(B" ; P .. W
",T.(B" ",TV(B" ",T.(B" ",Tc(B" ",TZ(B" ",T2(B" ",TX(B" "-" ; X .. _
",T#(B" ",Ti(B" ",TT(B" ",TE(B" ",T'(B" ",TB(B" ",T!(B" ",TQ(B" ; ` .. g
",TU(B" ",TA(B" ",TR(B" ",T9(B" ",T`(B" ",TJ(B" ",T$(B" ",TG(B" ; h .. o
",Ta(B" ",Tg(B" ",TM(B" ",T7(B" ",TC(B" ",T4(B" ",TK(B" ",T5(B" ; p .. w
",T;(B" ",Th(B" ",T:(B" ",TO(B" ",Tm(B" ",TF(B" ",T%(B" 0 ; x .. DEL
0 "+" "ฑ" "/" "," "?" "_" "ข" ; SPC .. '
"(" ")" "." "%" "ะ" "๑" "จ" "พ" ; ( .. /
"๐" "=" "๒" "๓" "๔" "๕" "ู" "๗" ; 0 .. 7
"๘" "๙" "ฆ" "ไ" "ฟ" "๖" "ฒ" "ฬ" ; 8 .. ?
"\"" "๋" "ั" "ฐ" "ำ" "ๆ" "ณ" "์" ; @ .. G
"ื" "ซ" "ผ" "ช" "โ" "ฮ" "ศ" "ถ" ; H .. O
"ฒ" "๊" "ญ" "ธ" "ษ" "ฝ" "ภ" "ฤ" ; P .. W
"ฎ" "ึ" "ฎ" "ใ" "ฺ" "ฒ" "ุ" "-" ; X .. _
"ฃ" "้" "ิ" "ล" "ง" "ย" "ก" "ั" ; ` .. g
"ี" "ม" "า" "น" "เ" "ส" "ค" "ว" ; h .. o
"แ" "็" "อ" "ท" "ร" "ด" "ห" "ต" ; p .. w
"ป" "่" "บ" "ฯ" "ํ" "ฦ" "ฅ" 0 ; x .. DEL
])
;;; thai.el ends here
This diff is collapsed.
;;; viqr.el --- Quail packages for inputting Vietnamese with VIQR system -*-coding: iso-2022-7bit;-*-
;;; viqr.el --- Quail packages for inputting Vietnamese with VIQR system -*-coding: utf-8;-*-
;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
;; 2006, 2007, 2008, 2009, 2010, 2011
......@@ -48,21 +48,21 @@
effect | postfix | examples
------------+---------+----------
breve | ( | a( -> ,1e(B
circumflex | ^ | a^ -> ,1b(B
horn | + | o+ -> ,1=(B
breve | ( | a( -> ă
circumflex | ^ | a^ -> â
horn | + | o+ -> ơ
------------+---------+----------
acute | ' | a' -> ,1a(B
grave | ` | a` -> ,1`(B
hook above | ? | a? -> ,1d(B
tilde | ~ | a~ -> ,1c(B
dot below | . | a. -> ,1U(B
acute | ' | a' -> á
grave | ` | a` -> à
hook above | ? | a? ->
tilde | ~ | a~ -> ã
dot below | . | a. ->
------------+---------+----------
d bar | dd | dd -> ,1p(B
d bar | dd | dd -> đ
------------+---------+----------
no compose | \\ | a\\. -> a.
------------+---------+----------
combination| (~ | a(~ -> ,1G(B
combination| (~ | a(~ ->
" nil t t nil nil t nil nil nil nil t)
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
2013-04-01 Paul Eggert <eggert@cs.ucla.edu>
Use UTF-8 for most files with non-ASCII characters (Bug#13936).
* international/latin1-disp.el, international/mule-util.el:
* language/cyril-util.el, language/european.el, language/ind-util.el:
* language/lao-util.el, language/thai.el, language/tibet-util.el:
* language/tibetan.el, language/viet-util.el:
Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs.
2013-04-01 Stefan Monnier <monnier@iro.umontreal.ca>
* electric.el (electric-pair-inhibit-predicate): New var (bug#14000).
......
This diff is collapsed.
......@@ -132,38 +132,38 @@ defaults to \"...\"."
;; (("xy" 2 1) . "y")
;; (("xy" 0) . "")
;; (("xy" 3) . "xy")
;; (("$AVP(B" 0) . "")
;; (("$AVP(B" 1) . "")
;; (("$AVP(B" 2) . "$AVP(B")
;; (("$AVP(B" 1 nil ? ) . " ")
;; (("$AVPND(B" 3 1 ? ) . " ")
;; (("x$AVP(Bx" 2) . "x")
;; (("x$AVP(Bx" 3) . "x$AVP(B")
;; (("x$AVP(Bx" 3) . "x$AVP(B")
;; (("x$AVP(Bx" 4 1) . "$AVP(Bx")
;; (("kor$(CGQ(Be$(C1[(Ban" 8 1 ? ) . "or$(CGQ(Be$(C1[(B")
;; (("kor$(CGQ(Be$(C1[(Ban" 7 2 ? ) . "r$(CGQ(Be ")
;; (("" 0) . "")
;; (("" 1) . "")
;; (("中" 2) . "中")
;; (("" 1 nil ? ) . " ")
;; (("中文" 3 1 ? ) . " ")
;; (("xx" 2) . "x")
;; (("x中x" 3) . "x中")
;; (("x中x" 3) . "x中")
;; (("x中x" 4 1) . "中x")
;; (("kor한e글an" 8 1 ? ) . "or한e글")
;; (("kor한e글an" 7 2 ? ) . "r한e ")
;; (("" 0 nil nil "...") . "")
;; (("x" 3 nil nil "...") . "x")
;; (("$AVP(B" 3 nil nil "...") . "$AVP(B")
;; (("中" 3 nil nil "...") . "中")
;; (("foo" 3 nil nil "...") . "foo")
;; (("foo" 2 nil nil "...") . "fo") ;; XEmacs failure?
;; (("foobar" 6 0 nil "...") . "foobar")
;; (("foobarbaz" 6 nil nil "...") . "foo...")
;; (("foobarbaz" 7 2 nil "...") . "ob...")
;; (("foobarbaz" 9 3 nil "...") . "barbaz")
;; (("$A$3(Bh$A$s(Be$A$K(Bl$A$A(Bl$A$O(Bo" 15 1 ? t) . " h$A$s(Be$A$K(Bl$A$A(Bl$A$O(Bo")
;; (("$A$3(Bh$A$s(Be$A$K(Bl$A$A(Bl$A$O(Bo" 14 1 ? t) . " h$A$s(Be$A$K(Bl$A$A(B...")
;; (("x" 3 nil nil "$(Gemk#(B") . "x")
;; (("$AVP(B" 2 nil nil "$(Gemk#(B") . "$AVP(B")
;; (("$AVP(B" 1 nil ?x "$(Gemk#(B") . "x") ;; XEmacs error
;; (("$AVPND(B" 3 nil ? "$(Gemk#(B") . "$AVP(B ") ;; XEmacs error
;; (("foobarbaz" 4 nil nil "$(Gemk#(B") . "$(Gemk#(B")
;; (("foobarbaz" 5 nil nil "$(Gemk#(B") . "f$(Gemk#(B")
;; (("foobarbaz" 6 nil nil "$(Gemk#(B") . "fo$(Gemk#(B")
;; (("foobarbaz" 8 3 nil "$(Gemk#(B") . "b$(Gemk#(B")
;; (("$A$3(Bh$A$s(Be$A$K(Bl$A$A(Bl$A$O(Bo" 14 4 ?x "$AHU1>$(Gk#(B") . "xe$A$KHU1>$(Gk#(B")
;; (("$A$3(Bh$A$s(Be$A$K(Bl$A$A(Bl$A$O(Bo" 13 4 ?x "$AHU1>$(Gk#(B") . "xex$AHU1>$(Gk#(B")
;; (("こhんeにlちlはo" 15 1 ? t) . " hんeにlちlはo")
;; (("こhんeにlちlはo" 14 1 ? t) . " hんeにlち...")
;; (("x" 3 nil nil "粵語") . "x")
;; (("中" 2 nil nil "粵語") . "中")
;; (("中" 1 nil ?x "粵語") . "x") ;; XEmacs error
;; (("中文" 3 nil ? "粵語") . "中 ") ;; XEmacs error
;; (("foobarbaz" 4 nil nil "粵語") . "粵語")
;; (("foobarbaz" 5 nil nil "粵語") . "f粵語")
;; (("foobarbaz" 6 nil nil "粵語") . "fo粵語")
;; (("foobarbaz" 8 3 nil "粵語") . "b粵語")
;; (("こhんeにlちlはo" 14 4 ?x "日本語") . "xeに日本語")
;; (("こhんeにlちlはo" 13 4 ?x "日本語") . "xex日本語")
;; ))
;; (let (ret)
;; (condition-case e
......@@ -367,7 +367,7 @@ per-character basis, this may not be accurate."
(provide 'mule-util)
;; Local Variables:
;; coding: iso-2022-7bit
;; coding: utf-8
;; End:
;;; mule-util.el ends here
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
;;; thai.el --- support for Thai -*- coding: iso-2022-7bit -*-
;;; thai.el --- support for Thai -*- coding: utf-8 -*-
;; Copyright (C) 1997-1998, 2000-2013 Free Software Foundation, Inc.
;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
......@@ -55,7 +55,7 @@
(exit-function . exit-thai-language-environment-internal)
(sample-text
. (thai-compose-string
(copy-sequence "Thai (,T@RIRd7B(B) ,TJGQJ4U$CQ:(B, ,TJGQJ4U$hP(B")))
(copy-sequence "Thai (ภาษาไทย) สวัสดีครับ, สวัสดีค่ะ")))
(documentation . t)))
(define-coding-system 'cp874
......@@ -75,12 +75,12 @@ This is the same as `thai-tis620' with the addition of no-break-space."
:charset-list '(iso-8859-11))
;; For automatic composition.
(let ((chars ",TQTUVWXYZghijklmn(B")
(elt '(["[,T!(B-,TO(B].[,Thijkl(B]?,TS(B?" 1 thai-composition-function]
(let ((chars "ัิีึืฺุู็่้๊๋์ํ๎")
(elt '(["[ก-ฯ].[่้๊๋์]?ำ?" 1 thai-composition-function]
[nil 0 thai-composition-function])))
(dotimes (i (length chars))
(aset composition-function-table (aref chars i) elt)))
(aset composition-function-table ?,TS(B '(["[,T!(B-,TO(B]." 1 thai-composition-function]))
(aset composition-function-table ? '(["[ก-ฯ]." 1 thai-composition-function]))