summaryrefslogtreecommitdiff
path: root/lisp/leim/quail/latin-post.el
diff options
context:
space:
mode:
authorBob Newell <bobnewell@bobnewell.net>2018-09-11 20:37:42 -1000
committerEli Zaretskii <eliz@gnu.org>2018-09-20 10:21:18 +0300
commit229c51afbf741b20504b821e6fd5da4145a776f5 (patch)
treebea1313059927c96feeac179af069c83daa13ab1 /lisp/leim/quail/latin-post.el
parent75d9a55fae1c484aa6d213064931bfe3b65cf5dd (diff)
downloademacs-229c51afbf741b20504b821e6fd5da4145a776f5.tar.gz
New input methods hawaiian-postfix and hawaiian-prefix
* lisp/leim/quail/latin-pre.el ("hawaiian-prefix"): * lisp/leim/quail/latin-post.el ("hawaiian-postfix"): New input methods. (Bug#32714) * etc/NEWS: Mention the new input methods.
Diffstat (limited to 'lisp/leim/quail/latin-post.el')
-rw-r--r--lisp/leim/quail/latin-post.el48
1 files changed, 48 insertions, 0 deletions
diff --git a/lisp/leim/quail/latin-post.el b/lisp/leim/quail/latin-post.el
index 791152bd65c..8b0253f36e3 100644
--- a/lisp/leim/quail/latin-post.el
+++ b/lisp/leim/quail/latin-post.el
@@ -739,6 +739,54 @@ Doubling the postfix separates the letter and postfix: e.g. a\\='\\=' -> a\\='
("z~~" ["z~"])
)
+;;; Hawaiian postfix input method. It's a small subset of Latin-4
+;;; with the addition of an ʻokina mapping. Hopefully the ʻokina shows
+;;; correctly on most displays.
+
+;;; This reference is an authoritative guide to Hawaiian orthography:
+;;; http://www2.hawaii.edu/~strauch/tips/HawaiianOrthography.html
+
+;;; Initial coding 2018-09-08 Bob Newell, Honolulu, Hawaiʻi
+;;; Comments to bobnewell@bobnewell.net
+
+(quail-define-package
+ "hawaiian-postfix" "Hawaiian Postfix" "H<" t
+ "Hawaiian characters input method with postfix modifiers
+
+ | postfix | examples
+ ------------+---------+----------
+ ʻokina | \\=` | \\=` -> ʻ
+ kahakō | - | a- -> ā
+
+Doubling the postfix separates the letter and postfix. a-- -> a-
+" nil t nil nil nil nil nil nil nil nil t)
+
+(quail-define-rules
+ ("A-" ?Ā)
+ ("E-" ?Ē)
+ ("I~" ?Ĩ)
+ ("O-" ?Ō)
+ ("U-" ?Ū)
+ ("a-" ?ā)
+ ("e-" ?ē)
+ ("i-" ?ī)
+ ("o-" ?ō)
+ ("u-" ?ū)
+ ("`" ?ʻ)
+
+ ("A--" ["A-"])
+ ("E--" ["E-"])
+ ("I--" ["I-"])
+ ("O--" ["O-"])
+ ("U--" ["U-"])
+ ("a--" ["a-"])
+ ("e--" ["e-"])
+ ("i--" ["i-"])
+ ("o--" ["o-"])
+ ("u--" ["u-"])
+ ("``" ["`"])
+ )
+
(quail-define-package
"latin-5-postfix" "Latin-5" "5<" t
"Latin-5 characters input method with postfix modifiers