Mercurial > emacs
annotate leim/quail/japanese.el @ 80507:65aec0fc638d
Docstring change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sat, 12 Apr 2008 05:17:39 +0000 |
parents | 3ca83a726835 |
children | 606f2d163a64 4f1fd208c354 |
rev | line source |
---|---|
40710 | 1 ;;; japanese.el --- Quail package for inputting Japanese -*-coding: iso-2022-7bit;-*- |
18673 | 2 |
79727 | 3 ;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
75253
f5f322eb227f
Update copyright for years from Emacs 21 to present.
Glenn Morris <rgm@gnu.org>
parents:
74605
diff
changeset
|
4 ;; Free Software Foundation, Inc. |
f5f322eb227f
Update copyright for years from Emacs 21 to present.
Glenn Morris <rgm@gnu.org>
parents:
74605
diff
changeset
|
5 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, |
79727 | 6 ;; 2006, 2007, 2008 |
67657 | 7 ;; National Institute of Advanced Industrial Science and Technology (AIST) |
8 ;; Registration Number H14PRO021 | |
18673 | 9 |
10 ;; Keywords: multilingual, input method, Japanese | |
11 | |
12 ;; This file is part of GNU Emacs. | |
13 | |
14 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
15 ;; it under the terms of the GNU General Public License as published by | |
78308
126deea128b3
Restore comma mistakenly removed in last change.
Glenn Morris <rgm@gnu.org>
parents:
78303
diff
changeset
|
16 ;; the Free Software Foundation; either version 3, or (at your option) |
18673 | 17 ;; any later version. |
18 | |
19 ;; GNU Emacs is distributed in the hope that it will be useful, | |
20 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
21 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
22 ;; GNU General Public License for more details. | |
23 | |
24 ;; You should have received a copy of the GNU General Public License | |
25 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
64083 | 26 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
27 ;; Boston, MA 02110-1301, USA. | |
18673 | 28 |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
37202
diff
changeset
|
29 ;;; Commentary: |
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
37202
diff
changeset
|
30 |
18673 | 31 ;;; Code: |
32 | |
33 (require 'quail) | |
34 (require 'kkc) | |
35 | |
22922
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
36 (defvar quail-japanese-use-double-n nil |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
37 "If non-nil, use type \"nn\" to insert $B$s(B.") |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
38 |
19411
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
39 ;; Update Quail translation region while considering Japanese bizarre |
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
40 ;; translation rules. |
18673 | 41 (defun quail-japanese-update-translation (control-flag) |
22922
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
42 (if (null control-flag) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
43 (setq quail-current-str |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
44 (if (/= (aref quail-current-key 0) ?q) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
45 (or quail-current-str quail-current-key) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
46 "")) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
47 (if (integerp control-flag) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
48 (if (= control-flag 0) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
49 (setq quail-current-str (aref quail-current-key 0)) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
50 (cond ((= (aref quail-current-key 0) ?n) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
51 (setq quail-current-str ?$B$s(B) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
52 (if (and quail-japanese-use-double-n |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
53 (= (aref quail-current-key 1) ?n)) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
54 (setq control-flag t))) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
55 ((= (aref quail-current-key 0) (aref quail-current-key 1)) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
56 (setq quail-current-str ?$B$C(B)) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
57 (t |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
58 (setq quail-current-str (aref quail-current-key 0)))) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
59 (if (integerp control-flag) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
60 (setq unread-command-events |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
61 (list (aref quail-current-key control-flag))))))) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
62 control-flag) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
40710
diff
changeset
|
63 |
18673 | 64 ;; Convert Hiragana <-> Katakana in the current translation region. |
65 (defun quail-japanese-toggle-kana () | |
66 (interactive) | |
22781
d7ebc53b6b16
(quail-japanese-update-translation): Handle
Kenichi Handa <handa@m17n.org>
parents:
22767
diff
changeset
|
67 (setq quail-translating nil) |
19411
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
68 (let ((start (overlay-start quail-conv-overlay)) |
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
69 (end (overlay-end quail-conv-overlay))) |
36834
ec1f6390f68e
(quail-japanese-kana-state): Delete this variable.
Kenichi Handa <handa@m17n.org>
parents:
36832
diff
changeset
|
70 (save-excursion |
ec1f6390f68e
(quail-japanese-kana-state): Delete this variable.
Kenichi Handa <handa@m17n.org>
parents:
36832
diff
changeset
|
71 (goto-char start) |
ec1f6390f68e
(quail-japanese-kana-state): Delete this variable.
Kenichi Handa <handa@m17n.org>
parents:
36832
diff
changeset
|
72 (if (re-search-forward "\\cH" end t) |
ec1f6390f68e
(quail-japanese-kana-state): Delete this variable.
Kenichi Handa <handa@m17n.org>
parents:
36832
diff
changeset
|
73 (japanese-katakana-region start end) |
ec1f6390f68e
(quail-japanese-kana-state): Delete this variable.
Kenichi Handa <handa@m17n.org>
parents:
36832
diff
changeset
|
74 (japanese-hiragana-region start end))) |
22922
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
75 (setq quail-conversion-str |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
76 (buffer-substring (overlay-start quail-conv-overlay) |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
77 (overlay-end quail-conv-overlay))))) |
18673 | 78 |
79 ;; Convert Hiragana in the current translation region to Kanji by KKC | |
80 ;; (Kana Kanji Converter) utility. | |
81 (defun quail-japanese-kanji-kkc () | |
82 (interactive) | |
33582
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
83 (when (= (char-before (overlay-end quail-conv-overlay)) ?n) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
84 ;; The last char is `n'. We had better convert it to `$B$s(B' |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
85 ;; before kana-kanji conversion. |
64152
a3d3e7ed5256
(quail-japanese-kanji-kkc): Fix order of
Kenichi Handa <handa@m17n.org>
parents:
64083
diff
changeset
|
86 (goto-char (1- (overlay-end quail-conv-overlay))) |
a3d3e7ed5256
(quail-japanese-kanji-kkc): Fix order of
Kenichi Handa <handa@m17n.org>
parents:
64083
diff
changeset
|
87 (insert ?$B$s(B) |
a3d3e7ed5256
(quail-japanese-kanji-kkc): Fix order of
Kenichi Handa <handa@m17n.org>
parents:
64083
diff
changeset
|
88 (delete-char 1)) |
33582
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
89 (let* ((from (copy-marker (overlay-start quail-conv-overlay))) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
90 (len (- (overlay-end quail-conv-overlay) from))) |
19411
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
91 (quail-delete-overlays) |
24067
89706001ab78
(quail-japanese-kanji-kkc): If the last char
Kenichi Handa <handa@m17n.org>
parents:
23316
diff
changeset
|
92 (setq quail-current-str nil) |
33582
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
93 (unwind-protect |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
94 (let ((result (kkc-region from (+ from len)))) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
95 (move-overlay quail-conv-overlay from (point)) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
96 (setq quail-conversion-str (buffer-substring from (point))) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
97 (if (= (+ from result) (point)) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
98 (setq quail-converting nil)) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
99 (setq quail-translating nil)) |
5ce190e20a23
(quail-japanese-kanji-kkc): Use marker to remember the conversion
Kenichi Handa <handa@m17n.org>
parents:
31427
diff
changeset
|
100 (set-marker from nil)))) |
18673 | 101 |
102 (defun quail-japanese-self-insert-and-switch-to-alpha (key idx) | |
103 (quail-delete-region) | |
104 (setq unread-command-events (list (aref key (1- idx)))) | |
105 (quail-japanese-switch-package "q" 1)) | |
106 | |
107 (defvar quail-japanese-switch-table | |
108 '((?z . "japanese-zenkaku") | |
109 (?k . "japanese-hankaku-kana") | |
110 (?h . "japanese") | |
111 (?q . ("japanese-ascii")))) | |
112 | |
113 (defvar quail-japanese-package-saved nil) | |
114 (make-variable-buffer-local 'quail-japanese-package-saved) | |
115 (put 'quail-japanese-package-saved 'permanent-local t) | |
116 | |
117 (defun quail-japanese-switch-package (key idx) | |
22795
b8d669900d55
(quail-japanese-kanji-kkc): Handle the case
Kenichi Handa <handa@m17n.org>
parents:
22781
diff
changeset
|
118 (quail-delete-region) |
22922
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
119 (setq quail-current-str nil |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
120 quail-converting nil |
dc1913c204c9
(quail-japanese-use-double-n): New variable.
Kenichi Handa <handa@m17n.org>
parents:
22817
diff
changeset
|
121 quail-conversion-str "") |
18673 | 122 (let ((pkg (cdr (assq (aref key (1- idx)) quail-japanese-switch-table)))) |
123 (if (null pkg) | |
22767
5fb5debece56
(quail-japanese-kanji-kkc): Adjusted for the change of quail.el.
Kenichi Handa <handa@m17n.org>
parents:
19517
diff
changeset
|
124 (quail-error "No package to be switched") |
18673 | 125 (if (stringp pkg) |
19411
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
126 (activate-input-method pkg) |
18673 | 127 (if (string= (car pkg) current-input-method) |
128 (if quail-japanese-package-saved | |
19411
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
129 (activate-input-method quail-japanese-package-saved)) |
18673 | 130 (setq quail-japanese-package-saved current-input-method) |
19411
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
131 (activate-input-method (car pkg)))))) |
ae9924361448
(quail-japanese-toggle-kana): Don't call
Kenichi Handa <handa@m17n.org>
parents:
18804
diff
changeset
|
132 (throw 'quail-tag nil)) |
18673 | 133 |
36832
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
134 (defvar quail-japanese-transliteration-rules |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
135 '(( "a" "$B$"(B") ( "i" "$B$$(B") ( "u" "$B$&(B") ( "e" "$B$((B") ( "o" "$B$*(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
136 ("ka" "$B$+(B") ("ki" "$B$-(B") ("ku" "$B$/(B") ("ke" "$B$1(B") ("ko" "$B$3(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
137 ("sa" "$B$5(B") ("si" "$B$7(B") ("su" "$B$9(B") ("se" "$B$;(B") ("so" "$B$=(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
138 ("ta" "$B$?(B") ("ti" "$B$A(B") ("tu" "$B$D(B") ("te" "$B$F(B") ("to" "$B$H(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
139 ("na" "$B$J(B") ("ni" "$B$K(B") ("nu" "$B$L(B") ("ne" "$B$M(B") ("no" "$B$N(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
140 ("ha" "$B$O(B") ("hi" "$B$R(B") ("hu" "$B$U(B") ("he" "$B$X(B") ("ho" "$B$[(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
141 ("ma" "$B$^(B") ("mi" "$B$_(B") ("mu" "$B$`(B") ("me" "$B$a(B") ("mo" "$B$b(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
142 ("ya" "$B$d(B") ("yu" "$B$f(B") ("yo" "$B$h(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
143 ("ra" "$B$i(B") ("ri" "$B$j(B") ("ru" "$B$k(B") ("re" "$B$l(B") ("ro" "$B$m(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
144 ("la" "$B$i(B") ("li" "$B$j(B") ("lu" "$B$k(B") ("le" "$B$l(B") ("lo" "$B$m(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
145 ("wa" "$B$o(B") ("wi" "$B$p(B") ("wu" "$B$&(B") ("we" "$B$q(B") ("wo" "$B$r(B") |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
40710
diff
changeset
|
146 ("n'" "$B$s(B") |
36832
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
147 ("ga" "$B$,(B") ("gi" "$B$.(B") ("gu" "$B$0(B") ("ge" "$B$2(B") ("go" "$B$4(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
148 ("za" "$B$6(B") ("zi" "$B$8(B") ("zu" "$B$:(B") ("ze" "$B$<(B") ("zo" "$B$>(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
149 ("da" "$B$@(B") ("di" "$B$B(B") ("du" "$B$E(B") ("de" "$B$G(B") ("do" "$B$I(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
150 ("ba" "$B$P(B") ("bi" "$B$S(B") ("bu" "$B$V(B") ("be" "$B$Y(B") ("bo" "$B$\(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
151 ("pa" "$B$Q(B") ("pi" "$B$T(B") ("pu" "$B$W(B") ("pe" "$B$Z(B") ("po" "$B$](B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
152 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
153 ("kya" ["$B$-$c(B"]) ("kyu" ["$B$-$e(B"]) ("kye" ["$B$-$'(B"]) ("kyo" ["$B$-$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
154 ("sya" ["$B$7$c(B"]) ("syu" ["$B$7$e(B"]) ("sye" ["$B$7$'(B"]) ("syo" ["$B$7$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
155 ("sha" ["$B$7$c(B"]) ("shu" ["$B$7$e(B"]) ("she" ["$B$7$'(B"]) ("sho" ["$B$7$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
156 ("cha" ["$B$A$c(B"]) ("chu" ["$B$A$e(B"]) ("che" ["$B$A$'(B"]) ("cho" ["$B$A$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
157 ("tya" ["$B$A$c(B"]) ("tyu" ["$B$A$e(B"]) ("tye" ["$B$A$'(B"]) ("tyo" ["$B$A$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
158 ("nya" ["$B$K$c(B"]) ("nyu" ["$B$K$e(B"]) ("nye" ["$B$K$'(B"]) ("nyo" ["$B$K$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
159 ("hya" ["$B$R$c(B"]) ("hyu" ["$B$R$e(B"]) ("hye" ["$B$R$'(B"]) ("hyo" ["$B$R$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
160 ("mya" ["$B$_$c(B"]) ("myu" ["$B$_$e(B"]) ("mye" ["$B$_$'(B"]) ("myo" ["$B$_$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
161 ("rya" ["$B$j$c(B"]) ("ryu" ["$B$j$e(B"]) ("rye" ["$B$j$'(B"]) ("ryo" ["$B$j$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
162 ("lya" ["$B$j$c(B"]) ("lyu" ["$B$j$e(B"]) ("lye" ["$B$j$'(B"]) ("lyo" ["$B$j$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
163 ("gya" ["$B$.$c(B"]) ("gyu" ["$B$.$e(B"]) ("gye" ["$B$.$'(B"]) ("gyo" ["$B$.$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
164 ("zya" ["$B$8$c(B"]) ("zyu" ["$B$8$e(B"]) ("zye" ["$B$8$'(B"]) ("zyo" ["$B$8$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
165 ("jya" ["$B$8$c(B"]) ("jyu" ["$B$8$e(B"]) ("jye" ["$B$8$'(B"]) ("jyo" ["$B$8$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
166 ( "ja" ["$B$8$c(B"]) ( "ju" ["$B$8$e(B"]) ( "je" ["$B$8$'(B"]) ( "jo" ["$B$8$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
167 ("bya" ["$B$S$c(B"]) ("byu" ["$B$S$e(B"]) ("bye" ["$B$S$'(B"]) ("byo" ["$B$S$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
168 ("pya" ["$B$T$c(B"]) ("pyu" ["$B$T$e(B"]) ("pye" ["$B$T$'(B"]) ("pyo" ["$B$T$g(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
169 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
170 ("kwa" ["$B$/$n(B"]) ("kwi" ["$B$/$#(B"]) ("kwe" ["$B$/$'(B"]) ("kwo" ["$B$/$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
171 ("tsa" ["$B$D$!(B"]) ("tsi" ["$B$D$#(B"]) ("tse" ["$B$D$'(B"]) ("tso" ["$B$D$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
172 ( "fa" ["$B$U$!(B"]) ( "fi" ["$B$U$#(B"]) ( "fe" ["$B$U$'(B"]) ( "fo" ["$B$U$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
173 ("gwa" ["$B$0$n(B"]) ("gwi" ["$B$0$#(B"]) ("gwe" ["$B$0$'(B"]) ("gwo" ["$B$0$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
174 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
175 ("dyi" ["$B$G$#(B"]) ("dyu" ["$B$I$%(B"]) ("dye" ["$B$G$'(B"]) ("dyo" ["$B$I$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
176 ("xwi" ["$B$&$#(B"]) ("xwe" ["$B$&$'(B"]) ("xwo" ["$B$&$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
177 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
178 ("shi" "$B$7(B") ("tyi" ["$B$F$#(B"]) ("chi" "$B$A(B") ("tsu" "$B$D(B") ("ji" "$B$8(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
179 ("fu" "$B$U(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
180 ("ye" ["$B$$$'(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
181 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
182 ("va" ["$B%t$!(B"]) ("vi" ["$B%t$#(B"]) ("vu" "$B%t(B") ("ve" ["$B%t$'(B"]) ("vo" ["$B%t$)(B"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
183 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
184 ("xa" "$B$!(B") ("xi" "$B$#(B") ("xu" "$B$%(B") ("xe" "$B$'(B") ("xo" "$B$)(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
185 ("xtu" "$B$C(B") ("xya" "$B$c(B") ("xyu" "$B$e(B") ("xyo" "$B$g(B") ("xwa" "$B$n(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
186 ("xka" "$B%u(B") ("xke" "$B%v(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
187 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
188 ("1" "$B#1(B") ("2" "$B#2(B") ("3" "$B#3(B") ("4" "$B#4(B") ("5" "$B#5(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
189 ("6" "$B#6(B") ("7" "$B#7(B") ("8" "$B#8(B") ("9" "$B#9(B") ("0" "$B#0(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
190 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
191 ("!" "$B!*(B") ("@" "$B!w(B") ("#" "$B!t(B") ("$" "$B!p(B") ("%" "$B!s(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
192 ("^" "$B!0(B") ("&" "$B!u(B") ("*" "$B!v(B") ("(" "$B!J(B") (")" "$B!K(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
193 ("-" "$B!<(B") ("=" "$B!a(B") ("`" "$B!.(B") ("\\" "$B!o(B") ("|" "$B!C(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
194 ("_" "$B!2(B") ("+" "$B!\(B") ("~" "$B!1(B") ("[" "$B!V(B") ("]" "$B!W(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
195 ("{" "$B!P(B") ("}" "$B!Q(B") (":" "$B!'(B") (";" "$B!((B") ("\"" "$B!I(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
196 ("'" "$B!G(B") ("." "$B!#(B") ("," "$B!"(B") ("<" "$B!c(B") (">" "$B!d(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
197 ("?" "$B!)(B") ("/" "$B!?(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
198 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
199 ("z1" "$B!{(B") ("z!" "$B!|(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
200 ("z2" "$B"&(B") ("z@" "$B"'(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
201 ("z3" "$B"$(B") ("z#" "$B"%(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
202 ("z4" "$B""(B") ("z$" "$B"#(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
203 ("z5" "$B!~(B") ("z%" "$B"!(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
204 ("z6" "$B!y(B") ("z^" "$B!z(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
205 ("z7" "$B!}(B") ("z&" "$B!r(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
206 ("z8" "$B!q(B") ("z*" "$B!_(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
207 ("z9" "$B!i(B") ("z(" "$B!Z(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
208 ("z0" "$B!j(B") ("z)" "$B![(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
209 ("z-" "$B!A(B") ("z_" "$B!h(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
210 ("z=" "$B!b(B") ("z+" "$B!^(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
211 ("z\\" "$B!@(B") ("z|" "$B!B(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
212 ("z`" "$B!-(B") ("z~" "$B!/(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
213 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
214 ("zq" "$B!T(B") ("zQ" "$B!R(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
215 ("zw" "$B!U(B") ("zW" "$B!S(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
216 ("zr" "$B!9(B") ("zR" "$B!8(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
217 ("zt" "$B!:(B") ("zT" "$B!x(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
218 ("zp" "$B")(B") ("zP" "$B",(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
219 ("z[" "$B!X(B") ("z{" "$B!L(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
220 ("z]" "$B!Y(B") ("z}" "$B!M(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
221 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
222 ("zs" "$B!3(B") ("zS" "$B!4(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
223 ("zd" "$B!5(B") ("zD" "$B!6(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
224 ("zf" "$B!7(B") ("zF" "$B"*(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
225 ("zg" "$B!>(B") ("zG" "$B!=(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
226 ("zh" "$B"+(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
227 ("zj" "$B"-(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
228 ("zk" "$B",(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
229 ("zl" "$B"*(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
230 ("z;" "$B!+(B") ("z:" "$B!,(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
231 ("z\'" "$B!F(B") ("z\"" "$B!H(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
232 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
233 ("zx" [":-"]) ("zX" [":-)"]) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
234 ("zc" "$B!;(B") ("zC" "$B!n(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
235 ("zv" "$B"((B") ("zV" "$B!`(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
236 ("zb" "$B!k(B") ("zB" "$B"+(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
237 ("zn" "$B!l(B") ("zN" "$B"-(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
238 ("zm" "$B!m(B") ("zM" "$B".(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
239 ("z," "$B!E(B") ("z<" "$B!e(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
240 ("z." "$B!D(B") ("z>" "$B!f(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
241 ("z/" "$B!&(B") ("z?" "$B!g(B") |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
242 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
243 ("\\\\" quail-japanese-self-insert-and-switch-to-alpha) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
244 ("{{" quail-japanese-self-insert-and-switch-to-alpha) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
245 ("}}" quail-japanese-self-insert-and-switch-to-alpha) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
246 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
247 ("qq" quail-japanese-switch-package) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
248 ("qz" quail-japanese-switch-package) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
249 )) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
250 |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
251 |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
252 ;; $B%m!<%^;zF~NO5Z$S2>L>4A;zJQ49$K$h$kF|K\8lF~NO%a%=%C%I(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
253 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
254 ;; $B$3$NF~NO%a%=%C%I$G$NF|K\8l$NF~NO$OFs$D$N%9%F!<%8!V%m!<%^;z2>L>JQ49!W(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
255 ;; $B$H!V2>L>4A;zJQ49!W$+$i$J$k!#:G=i$O%m!<%^;z2>L>JQ49$N%9%F!<%8$G!"%9(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
256 ;; $B%Z!<%9%-!<$r2!$9$3$H$K$h$j!"<!$N%9%F!<%8!V2>L>4A;zJQ49!W$X?J$`!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
257 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
258 ;; $B!V%m!<%^;z2>L>JQ49!W(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
259 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
260 ;; $BJ?2>L>$O>.J8;z%-!<!JNs!K$rBG$D$3$H$K$h$jF~NO!#6gFIE@!"3g8LN`$OBP1~(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
261 ;; $B$9$k1Q;z%-!<$rBG$D$3$H$K$h$jF~NO!#$=$NB>$N%7%s%\%k$O(B `z' $B$KB3$1$F2?(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
262 ;; $B$l$+$N%-!<$rBG$D$3$H$K$h$jF~NO!#2<$KA4$F$N2DG=$J%-!<%7!<%1%s%9%j%9(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
263 ;; $B%H%"%C%W$5$l$F$$$k!#F~NO$5$l$?J8;z$O2<@~$G<($5$l$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
264 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
265 ;; $B$5$i$K0J2<$N%-!<$GFCJL$J=hM}$r9T$&!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
266 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
267 ;; K $BJ?2>L>$rJR2>L>$K!"$"$k$$$OJR2>L>$rJ?2>L>$KJQ49(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
268 ;; qq $B$3$NF~NO%a%=%C%I$H(B `japanese-ascii' $BF~NO%a%=%C%I$r%H%0%k@ZBX(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
269 ;; qz `japanese-zenkaku' $BF~NO%a%=%C%I$K%7%U%H(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
270 ;; qh $B$HBG$F$P85$KLa$k(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
271 ;; RET $B8=:_$NF~NOJ8;zNs$r3NDj(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
272 ;; SPC $B2>L>4A;zJQ49$K?J$`(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
273 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
274 ;; `japanese-ascii' $BF~NO%a%=%C%I$O(B ASCII $BJ8;z$rF~NO$9$k$N$K;H$&!#$3$l(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
275 ;; $B$OF~NO%a%=%C%I$r%*%U$K$9$k$N$H$[$H$s$IF1$8$G$"$k!#0[$J$k$N$O(B qq $B$H(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
276 ;; $BBG$D$3$H$K$h$j!"(B`japanese' $BF~NO%a%=%C%I$KLa$l$kE@$G$"$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
277 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
278 ;; `japanese-zenkaku' $BF~NO%a%=%C%I$OA43Q1Q?t;z$rF~NO$9$k$N$K;H$&!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
279 ;; |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
280 ;; $B!V%m!<%^;z2>L>JQ49!W%9%F!<%8$G$N%-!<%7!<%1%s%9$N%j%9%H$O:G8e$KIU$1(B |
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
281 ;; $B$F$"$k!#(B |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
282 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
283 ;; $B!V2>L>4A;zJQ49!W(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
284 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
285 ;; $B$3$N%9%F!<%8$G$O!"A0%9%F!<%8$GF~NO$5$l$?J8;zNs$r2>L>4A;zJQ49$9$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
286 ;; $BJQ49$5$l$?J8;zNs$O!"CmL\J8@a!JH?E>I=<(!K$H;D$j$NF~NO!J2<@~I=<(!K$K(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
287 ;; $BJ,$1$i$l$k!#CmL\J8@a$KBP$7$F$O0J2<$N%3%^%s%I$,;H$($k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
288 ;; |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
289 ;; SPC, C-n kkc-next |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
290 ;; $B<!$NJQ498uJd$rI=<((B |
30252
5955b64b1637
("japanese"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents:
27131
diff
changeset
|
291 ;; kkc-show-conversion-list-count $B0J>eB3$1$FBG$F$P!"JQ498uJd%j%9(B |
5955b64b1637
("japanese"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents:
27131
diff
changeset
|
292 ;; $B%H$r%(%3!<%(%j%"$KI=<((B |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
293 ;; C-p kkc-prev |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
294 ;; $BA0$NJQ498uJd$rI=<((B |
30252
5955b64b1637
("japanese"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents:
27131
diff
changeset
|
295 ;; kkc-show-conversion-list-count $B0J>eB3$1$FBG$F$P!"JQ498uJd%j%9(B |
5955b64b1637
("japanese"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents:
27131
diff
changeset
|
296 ;; $B%H$r%(%3!<%(%j%"$KI=<((B |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
297 ;; l kkc-show-conversion-list-or-next-group |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
298 ;; $B:G9b#1#08D$^$G$NJQ498uJd$r%(%3!<%(%j%"$KI=<(!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
299 ;; $BB3$1$FBG$?$l$l$P!"<!$N#1#08uJd$rI=<(!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
300 ;; L kkc-show-conversion-list-or-prev-group |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
301 ;; $B:G9b#1#08D$^$G$NJQ498uJd$r%(%3!<%(%j%"$KI=<(!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
302 ;; $BB3$1$FBG$?$l$l$P!"A0$N#1#08uJd$rI=<(!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
303 ;; 0..9 kkc-select-from-list |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
304 ;; $BBG$?$l$??t;z$NJQ498uJd$rA*Br(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
305 ;; H kkc-hiragana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
306 ;; $BCmL\J8@a$rJ?2>L>$KJQ49(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
307 ;; K kkc-katakana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
308 ;; $BCmL\J8@a$rJR2>L>$KJQ49(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
309 ;; C-o kkc-longer |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
310 ;; $BCmL\J8@a$r8e$m$K0lJ8;z?-$P$9(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
311 ;; C-i kkc-shorter |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
312 ;; $BCmL\J8@a$r8e$m$+$i0lJ8;z=L$a$k(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
313 ;; C-f kkc-next-phrase |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
314 ;; $BCmL\J8@a$r3NDj$5$;$k!#$b$7;D$j$NF~NO$,$^$@$"$l$P!":G=i$NJ8@a$r(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
315 ;; $BA*Br$7!"$=$l$rCmL\J8@a$H$7!"$=$N:G=i$NJQ498uJd$rI=<($9$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
316 ;; DEL, C-c kkc-cancel |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
317 ;; $B2>L>4A;zJQ49$r%-%c%s%;%k$7!"%m!<%^;z2>L>JQ49$N%9%F!<%8$KLa$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
318 ;; return kkc-terminate |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
319 ;; $BA4J8@a$r3NDj$5$;$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
320 ;; C-SPC, C-@ kkc-first-char-only |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
321 ;; $B:G=i$NJ8;z$r3NDj$5$;!";D$j$O:o=|$9$k!#(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
322 ;; C-h kkc-help |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
323 ;; $B$3$l$i$N%-!<%P%$%s%I$N%j%9%H$rI=<($9$k!#$"(B |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
324 |
18673 | 325 (quail-define-package |
326 "japanese" "Japanese" "A$B$"(B" | |
327 nil | |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
328 "Japanese input method by Roman transliteration and Kana-Kanji conversion. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
329 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
330 When you use this input method, text entry proceeds in two stages: |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
331 Roman-Kana transliteration and Kana-Kanji conversion. When you start |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
332 to enter text, you are in the first stage, Roman-Kana transliteration. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
333 Type SPC to proceed to the next stage, Kana-Kanji conversion. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
334 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
335 :: Roman-Kana transliteration :: |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
336 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
337 You can input any Hiragana character as a sequence of lower-case |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
338 letters, Japanese punctuation characters by typing punctuation keys, |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
339 Japanese symbols by typing `z' followed by another key. See below for |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
340 a list of all available sequences. The characters you input are |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
341 underlined. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
342 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
343 In addition, the following keys provide special effects: |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
344 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
345 K Change Hiragana to Katakana or Katakana to Hiragana. |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
346 qq Toggle between this input method and the input method `japanese-ascii'. |
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
347 qz Shift to the input method `japanese-zenkaku'. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
348 Typing \"qh\" will put you back to this input method. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
349 RET Accept the current character sequence. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
350 SPC Proceed to the next stage, Kana-Kanji conversion. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
351 |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
352 The input method `japanese-ascii' is used to enter ASCII characters. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
353 This is almost the same as turning off the input method. The only |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
354 difference is that typing `qq' will put you back into the Japanese |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
355 input method. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
356 |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
357 The input method `japanese-zenkaku' is used to enter full width |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
358 JISX0208 characters corresponding to typed ASCII characters. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
359 |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
360 List of the all key sequences for Roman-Kana transliteration is shown |
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
361 at the tail. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
362 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
363 :: Kana-Kanji conversion :: |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
364 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
365 You can convert the current Japanese characters (underlined) to |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
366 Kana-Kanji mixed text. In this stage, the converted text is divided |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
367 into two parts, the current phrase (highlighted) and the remaining |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
368 input (underlined). The following commands can be used on the |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
369 current phrase. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
370 |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
371 SPC, C-n kkc-next |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
372 Show the next candidate for the current phrase. |
30253 | 373 If successively typed `kkc-show-conversion-list-count' times, |
30252
5955b64b1637
("japanese"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents:
27131
diff
changeset
|
374 conversion candidates are shown in the echo area. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
375 C-p kkc-prev |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
376 Show the previous candidate for the current phrase. |
30253 | 377 If successively typed `kkc-show-conversion-list-count' times, |
30252
5955b64b1637
("japanese"): Docstring modified.
Kenichi Handa <handa@m17n.org>
parents:
27131
diff
changeset
|
378 conversion candidates are shown in the echo area. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
379 l kkc-show-conversion-list-or-next-group |
30264
0f70c0c64a49
("japanese"): Fix docstring.
Kenichi Handa <handa@m17n.org>
parents:
30253
diff
changeset
|
380 Show at most 10 candidates for the current phrase in echo area. |
27131
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
381 If typed repeatedly, show the next 10 candidates. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
382 L kkc-show-conversion-list-or-prev-group |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
383 Show at most 10 candidates for the current phrase in echo area. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
384 If typed repeatedly, show the previous 10 candidates. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
385 0..9 kkc-select-from-list |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
386 Select a candidate corresponding to the typed number. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
387 H kkc-hiragana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
388 Convert the current phrase to Hiragana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
389 K kkc-katakana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
390 Convert the current phrase to Katakana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
391 C-o kkc-longer |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
392 Extend the current phrase; pull in the first character of |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
393 the remaining input. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
394 C-i kkc-shorter |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
395 Contract the current phrase; drop its last character |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
396 back into the remaining input. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
397 C-f kkc-next-phrase |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
398 Accept the current phrase. If there remains input, select |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
399 the first phrase as the current one, and show the first |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
400 candidate for the conversion. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
401 DEL, C-c kkc-cancel |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
402 Cancel the conversion, shift back to the Roman-Kana |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
403 transliteration. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
404 return kkc-terminate |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
405 Accept the whole conversion. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
406 C-SPC, C-@ kkc-first-char-only |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
407 Accept the first character of the current conversion, |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
408 delete the remaining input. |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
409 C-h kkc-help |
6a56916deed4
("japanese"): Docstring augmented.
Kenichi Handa <handa@m17n.org>
parents:
24067
diff
changeset
|
410 List these key bindings. |
18673 | 411 " |
412 nil t t nil nil nil nil nil | |
413 'quail-japanese-update-translation | |
414 '(("K" . quail-japanese-toggle-kana) | |
415 (" " . quail-japanese-kanji-kkc) | |
416 ("\C-m" . quail-no-conversion) | |
417 ([return] . quail-no-conversion)) | |
418 ) | |
419 | |
36832
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
420 (dolist (elt quail-japanese-transliteration-rules) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
421 (quail-defrule (car elt) (nth 1 elt))) |
18673 | 422 |
423 (quail-define-package | |
424 "japanese-ascii" "Japanese" "Aa" | |
425 nil | |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
426 "Temporary ASCII input mode used within the input method `japanese'. |
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
427 Type \"qq\" to go back to previous input method." |
18673 | 428 nil t t) |
429 | |
430 (quail-define-rules ("qq" quail-japanese-switch-package)) | |
431 | |
432 (quail-define-package | |
433 "japanese-zenkaku" "Japanese" "$B#A(B" | |
434 nil | |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
435 "Japanese zenkaku alpha numeric character input method. |
18673 | 436 ---- Special key bindings ---- |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
437 qq: toggle between this input method and the input method `japanese-ascii'. |
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
438 qh: shift to the input method `japanese', |
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
439 typing \"qz\" puts you back to this input method. |
18673 | 440 " |
441 nil t t) | |
442 | |
443 (quail-define-rules | |
444 | |
445 (" " "$B!!(B") ("!" "$B!*(B") ("\"" "$B!m(B") ("#" "$B!t(B") | |
446 ("$" "$B!p(B") ("%" "$B!s(B") ("&" "$B!u(B") ("'" "$B!l(B") | |
447 ("(" "$B!J(B") (")" "$B!K(B") ("*" "$B!v(B") ("+" "$B!\(B") | |
448 ("," "$B!$(B") ("-" "$B!](B") ("." "$B!%(B") ("/" "$B!?(B") | |
449 ("0" "$B#0(B") ("1" "$B#1(B") ("2" "$B#2(B") ("3" "$B#3(B") | |
450 ("4" "$B#4(B") ("5" "$B#5(B") ("6" "$B#6(B") ("7" "$B#7(B") | |
451 ("8" "$B#8(B") ("9" "$B#9(B") (":" "$B!'(B") (";" "$B!((B") | |
452 ("<" "$B!c(B") ("=" "$B!a(B") (">" "$B!d(B") ("?" "$B!)(B") | |
453 ("@" "$B!w(B") ("A" "$B#A(B") ("B" "$B#B(B") ("C" "$B#C(B") | |
454 ("D" "$B#D(B") ("E" "$B#E(B") ("F" "$B#F(B") ("G" "$B#G(B") | |
455 ("H" "$B#H(B") ("I" "$B#I(B") ("J" "$B#J(B") ("K" "$B#K(B") | |
456 ("L" "$B#L(B") ("M" "$B#M(B") ("N" "$B#N(B") ("O" "$B#O(B") | |
457 ("P" "$B#P(B") ("Q" "$B#Q(B") ("R" "$B#R(B") ("S" "$B#S(B") | |
458 ("T" "$B#T(B") ("U" "$B#U(B") ("V" "$B#V(B") ("W" "$B#W(B") | |
459 ("X" "$B#X(B") ("Y" "$B#Y(B") ("Z" "$B#Z(B") ("[" "$B!N(B") | |
460 ("\\" "$B!o(B") ("]" "$B!O(B") ("^" "$B!0(B") ("_" "$B!2(B") | |
461 ("`" "$B!F(B") ("a" "$B#a(B") ("b" "$B#b(B") ("c" "$B#c(B") | |
462 ("d" "$B#d(B") ("e" "$B#e(B") ("f" "$B#f(B") ("g" "$B#g(B") | |
463 ("h" "$B#h(B") ("i" "$B#i(B") ("j" "$B#j(B") ("k" "$B#k(B") | |
464 ("l" "$B#l(B") ("m" "$B#m(B") ("n" "$B#n(B") ("o" "$B#o(B") | |
465 ("p" "$B#p(B") ("q" "$B#q(B") ("r" "$B#r(B") ("s" "$B#s(B") | |
466 ("t" "$B#t(B") ("u" "$B#u(B") ("v" "$B#v(B") ("w" "$B#w(B") | |
467 ("x" "$B#x(B") ("y" "$B#y(B") ("z" "$B#z(B") ("{" "$B!P(B") | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
40710
diff
changeset
|
468 ("|" "$B!C(B") ("}" "$B!Q(B") ("~" "$B!A(B") |
18673 | 469 |
470 ("qq" quail-japanese-switch-package) | |
471 ("qh" quail-japanese-switch-package) | |
472 ) | |
473 | |
474 (defun quail-japanese-hankaku-update-translation (control-flag) | |
23316
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
475 (setq control-flag |
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
476 (quail-japanese-update-translation control-flag)) |
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
477 (if (or (and (stringp quail-current-str) |
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
478 (> (length quail-current-str) 0)) |
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
479 (integerp quail-current-str)) |
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
480 (setq quail-current-str (japanese-hankaku quail-current-str))) |
308cd9d90647
(quail-japanese-hankaku-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
23262
diff
changeset
|
481 control-flag) |
18673 | 482 |
483 (quail-define-package | |
484 "japanese-hankaku-kana" | |
485 "Japanese" "(I1(B" | |
486 nil | |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
487 "Japanese hankaku katakana input method by Roman transliteration. |
18673 | 488 ---- Special key bindings ---- |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
489 qq: toggle between this input method and the input method `japanese-ascii'. |
18673 | 490 " |
491 nil t t nil nil nil nil nil | |
492 'quail-japanese-hankaku-update-translation) | |
493 | |
37202
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
494 (dolist (elt quail-japanese-transliteration-rules) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
495 (quail-defrule (car elt) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
496 (let ((trans (nth 1 elt))) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
497 (when (or (stringp trans) (vectorp trans)) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
498 (let ((s (japanese-hankaku (if (stringp trans) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
499 trans |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
500 (aref trans 0))))) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
501 ;; If the result of the conversion is a string |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
502 ;; containing more than one character, make the |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
503 ;; result a vector, so that quail-defrule |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
504 ;; recognizes the whole string is the |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
505 ;; translation, instead of interpreting |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
506 ;; individual characters as alternative |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
507 ;; translations. |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
508 (if (and (stringp s) (> (length s) 1)) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
509 (setq trans (vector s)) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
510 (setq trans s)))) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
511 trans))) |
18673 | 512 |
513 (quail-define-package | |
514 "japanese-hiragana" "Japanese" "$B$"(B" | |
515 nil | |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
516 "Japanese hiragana input method by Roman transliteration." |
18673 | 517 nil t t nil nil nil nil nil |
518 'quail-japanese-update-translation) | |
519 | |
520 ;; Use the same map as that of `japanese'. | |
521 (setcar (cdr (cdr quail-current-package)) | |
522 (nth 2 (assoc "japanese" quail-package-alist))) | |
523 | |
524 ;; Update Quail translation region while converting Hiragana to Katakana. | |
525 (defun quail-japanese-katakana-update-translation (control-flag) | |
23262
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
526 (setq control-flag |
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
527 (quail-japanese-update-translation control-flag)) |
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
528 (if (or (and (stringp quail-current-str) |
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
529 (> (length quail-current-str) 0)) |
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
530 (integerp quail-current-str)) |
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
531 (setq quail-current-str (japanese-katakana quail-current-str))) |
5d2f6f759380
(quail-japanese-katakana-update-translation):
Kenichi Handa <handa@m17n.org>
parents:
22922
diff
changeset
|
532 control-flag) |
18673 | 533 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
40710
diff
changeset
|
534 (quail-define-package |
18673 | 535 "japanese-katakana" "Japanese" "$B%"(B" |
536 nil | |
31427
57911faddb37
("japanese"): Delete the key sequence for
Kenichi Handa <handa@m17n.org>
parents:
30264
diff
changeset
|
537 "Japanese katakana input method by Roman transliteration." |
18673 | 538 nil t t nil nil nil nil nil |
539 'quail-japanese-katakana-update-translation) | |
540 | |
36832
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
541 (dolist (elt quail-japanese-transliteration-rules) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
542 (quail-defrule (car elt) |
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
543 (let ((trans (nth 1 elt))) |
37202
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
544 (cond ((stringp trans) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
545 (japanese-katakana trans)) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
546 ((vectorp trans) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
547 (vector (japanese-katakana (aref trans 0)))) |
9e69de8a5048
("japanese-hankaku-kana"): Don't use
Gerd Moellmann <gerd@gnu.org>
parents:
36834
diff
changeset
|
548 (t trans))))) |
36832
f40b8211dbe0
(quail-japanese-transliteration-rules): New variable. Use it to
Kenichi Handa <handa@m17n.org>
parents:
33582
diff
changeset
|
549 |
52401 | 550 ;;; arch-tag: 47e0bfd4-6ecc-4d01-89a8-d687c5e01ff7 |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
37202
diff
changeset
|
551 ;;; japanese.el ends here |