("latin-prefix"): New.

diff --git a/leim/quail/latin-pre.el b/leim/quail/latin-pre.el
index 2fe5a7ce835e3f15a7c943870d82377fa5aa023b..749fb18396dd31b800a30157c62eb5faa7375a53 100644 (file)
--- a/leim/quail/latin-pre.el
+++ b/leim/quail/latin-pre.el
@@ -980,4 +980,206 @@ For example, the character named `aogonek' is obtained by `/a'."
  ("^r" ?\e,_.\e(B)
  ("^c" ?\e,_)\e(B))
 
+(quail-define-package
+ "latin-prefix" "Latin" "L>" t
+ "Latin characters input method with prefix modifiers.
+This is the union of various input methods originally made for input
+of characters from a single Latin-N charset.
+
+    effect   | prefix | examples
+ ------------+--------+----------
+    acute    |   '    | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B
+    grave    |   `    | `a -> \e,A`\e(B
+  circumflex |   ^    | ^a -> \e,Ab\e(B
+  diaeresis  |   \"    | \"a -> \e,Ad\e(B  \"\" -> \e,A(\e(B
+    tilde    |   ~    | ~a -> \e,Ac\e(B
+   cedilla   |   ~    | ~c -> \e,Ag\e(B
+    breve    |   ~    | ~a -> \e$,1 #\e(B
+    caron    |   ~    | ~c -> \e$,1 -\e(B
+  dot above  | ~ / .  | ~o -> \e$,1 A\e(B   /o -> \e$,1 A\e(B   .o -> \e$,1 A\e(B
+    misc     | \" ~ /  | \"s -> \e,A_\e(B  ~d -> \e,Ap\e(B  ~t -> \e,A~\e(B  /a -> \e,Ae\e(B  /e -> \e,Af\e(B  /o -> \e,Ax\e(B
+   symbol    |   ~    | ~> -> \e,A;\e(B  ~< -> \e,A+\e(B  ~! -> \e,A!\e(B  ~? -> \e,A?\e(B  ~~ -> \e,A8\e(B
+   symbol    |  _ /   | _o -> \e,A:\e(B  _a -> \e,A*\e(B  // -> \e,A0\e(B  /\\ -> \e,AW\e(B  _y -> \e,A%\e(B
+   symbol    |   ^    | ^r -> \e,A.\e(B  ^c -> \e,A)\e(B  ^1 -> \e,A9\e(B  ^2 -> \e,A2\e(B  ^3 -> \e,A3\e(B
+" nil t nil nil nil nil nil nil nil nil t)
+
+(quail-define-rules
+ ("' " ?')
+ ("''" ?\e,A4\e(B)
+ ("'A" ?\e,AA\e(B)
+ ("'E" ?\e,AI\e(B)
+ ("'I" ?\e,AM\e(B)
+ ("'O" ?\e,AS\e(B)
+ ("'U" ?\e,AZ\e(B)
+ ("'W" ?\e$,1nb\e(B)
+ ("'Y" ?\e,A]\e(B)
+ ("'a" ?\e,Aa\e(B)
+ ("'e" ?\e,Ai\e(B)
+ ("'i" ?\e,Am\e(B)
+ ("'o" ?\e,As\e(B)
+ ("'u" ?\e,Az\e(B)
+ ("'w" ?\e$,1nc\e(B)
+ ("'y" ?\e,A}\e(B)
+ (".B" ?\e$,1mB\e(B)
+ (".C" ?\e$,1 *\e(B)
+ (".D" ?\e$,1mJ\e(B)
+ (".F" ?\e$,1m^\e(B)
+ (".G" ?\e$,1 @\e(B)
+ (".I" ?\e$,1 P\e(B)
+ (".M" ?\e$,1n \e(B)
+ (".P" ?\e$,1n6\e(B)
+ (".S" ?\e$,1n@\e(B)
+ (".T" ?\e$,1nJ\e(B)
+ (".Z" ?\e$,1!;\e(B)
+ (".b" ?\e$,1mC\e(B)
+ (".c" ?\e$,1 +\e(B)
+ (".d" ?\e$,1mK\e(B)
+ (".f" ?\e$,1m_\e(B)
+ (".g" ?\e$,1 A\e(B)
+ (".m" ?\e$,1n!\e(B)
+ (".p" ?\e$,1n7\e(B)
+ (".s" ?\e$,1nA\e(B)
+ (".t" ?\e$,1nK\e(B)
+ (".z" ?\e$,1!<\e(B)
+ ("/ " ?/)
+ ("/#" ?\e,A#\e(B)
+ ("/$" ?\e,A$\e(B)
+ ("/." ?\e$,1$y\e(B)
+ ("//" ?\e,A0\e(B)
+ ("/2" ?\e,A=\e(B)
+ ("/3" ?\e,A>\e(B)
+ ("/4" ?\e,A<\e(B)
+ ("/=" ?\e,A,\e(B)
+ ("/A" ?\e,AE\e(B)
+ ("/C" ?\e$,1 *\e(B)
+ ("/E" ?\e,AF\e(B)
+ ("/G" ?\e$,1 @\e(B)
+ ("/H" ?\e$,1 F\e(B)
+ ("/I" ?\e$,1 P\e(B)
+ ("/O" ?\e,AX\e(B)
+ ("/O" ?\e$,1 r\e(B)
+ ("/Z" ?\e$,1!;\e(B)
+ ("/\\" ?\e,AW\e(B)
+ ("/a" ?\e,Ae\e(B)
+ ("/c" ?\e,A"\e(B)
+ ("/c" ?\e$,1 +\e(B)
+ ("/e" ?\e,Af\e(B)
+ ("/g" ?\e$,1 A\e(B)
+ ("/h" ?\e$,1 G\e(B)
+ ("/i" ?\e$,1 Q\e(B)
+ ("/o" ?\e,Ax\e(B)
+ ("/o" ?\e$,1 s\e(B)
+ ("/z" ?\e$,1!<\e(B)
+ ("\" " ?\")
+ ("\"A" ?\e,AD\e(B)
+ ("\"E" ?\e,AK\e(B)
+ ("\"I" ?\e,AO\e(B)
+ ("\"O" ?\e,AV\e(B)
+ ("\"U" ?\e,A\\e(B)
+ ("\"W" ?\e$,1nd\e(B)
+ ("\"Y" ?\e$,1!8\e(B)
+ ("\"\"" ?\e,A(\e(B)
+ ("\"a" ?\e,Ad\e(B)
+ ("\"e" ?\e,Ak\e(B)
+ ("\"i" ?\e,Ao\e(B)
+ ("\"o" ?\e,Av\e(B)
+ ("\"s" ?\e,A_\e(B)
+ ("\"u" ?\e,A|\e(B)
+ ("\"w" ?\e$,1ne\e(B)
+ ("\"y" ?\e,A\7f\e(B)
+ ("^ " ?^)
+ ("^1" ?\e,A9\e(B)
+ ("^2" ?\e,A2\e(B)
+ ("^3" ?\e,A3\e(B)
+ ("^A" ?\e,AB\e(B)
+ ("^C" ?\e$,1 (\e(B)
+ ("^E" ?\e,AJ\e(B)
+ ("^G" ?\e$,1 <\e(B)
+ ("^H" ?\e$,1 D\e(B)
+ ("^I" ?\e,AN\e(B)
+ ("^J" ?\e$,1 T\e(B)
+ ("^O" ?\e,AT\e(B)
+ ("^S" ?\e$,1 |\e(B)
+ ("^U" ?\e,A[\e(B)
+ ("^W" ?\e$,1!4\e(B)
+ ("^Y" ?\e$,1!6\e(B)
+ ("^^" ?^)
+ ("^a" ?\e,Ab\e(B)
+ ("^c" ?\e,A)\e(B)
+ ("^c" ?\e$,1 )\e(B)
+ ("^e" ?\e,Aj\e(B)
+ ("^g" ?\e$,1 =\e(B)
+ ("^h" ?\e$,1 E\e(B)
+ ("^i" ?\e,An\e(B)
+ ("^j" ?\e$,1 U\e(B)
+ ("^o" ?\e,At\e(B)
+ ("^r" ?\e,A.\e(B)
+ ("^s" ?\e$,1 }\e(B)
+ ("^u" ?\e,A{\e(B)
+ ("^w" ?\e$,1!5\e(B)
+ ("^y" ?\e$,1!7\e(B)
+ ("_+" ?\e,A1\e(B)
+ ("_:" ?\e,Aw\e(B)
+ ("_a" ?\e,A*\e(B)
+ ("_o" ?\e,A:\e(B)
+ ("_y" ?\e,A%\e(B)
+ ("_ " ?\e,A \e(B)
+ ("` " ?`)
+ ("`A" ?\e,A@\e(B)
+ ("`E" ?\e,AH\e(B)
+ ("`I" ?\e,AL\e(B)
+ ("`O" ?\e,AR\e(B)
+ ("`U" ?\e,AY\e(B)
+ ("`W" ?\e$,1n`\e(B)
+ ("`Y" ?\e$,1or\e(B)
+ ("``" ?`)
+ ("`a" ?\e,A`\e(B)
+ ("`e" ?\e,Ah\e(B)
+ ("`i" ?\e,Al\e(B)
+ ("`o" ?\e,Ar\e(B)
+ ("`u" ?\e,Ay\e(B)
+ ("`w" ?\e$,1na\e(B)
+ ("`y" ?\e$,1os\e(B)
+ ("~ " ?~)
+ ("~!" ?\e,A!\e(B)
+ ("~$" ?\e,A#\e(B)
+ ("~-" ?\e,A-\e(B)
+ ("~." ?\e,A7\e(B)
+ ("~<" ?\\e,A+\e(B)
+ ("~=" ?\e,A/\e(B)
+ ("~>" ?\\e,A;\e(B)
+ ("~?" ?\e,A?\e(B)
+ ("~A" ?\e,AC\e(B)
+ ("~C" ?\e,AG\e(B)
+ ("~D" ?\e,AP\e(B)
+ ("~G" ?\e$,1 >\e(B)
+ ("~N" ?\e,AQ\e(B)
+ ("~O" ?\e,AU\e(B)
+ ("~O" ?\e$,1 @\e(B)
+ ("~S" ?\e$,1 ~\e(B)
+ ("~S" ?\e$,1! \e(B)
+ ("~T" ?\e,A^\e(B)
+ ("~U" ?\e$,1!,\e(B)
+ ("~Z" ?\e$,1!=\e(B)
+ ("~`" ?\e$,1$x\e(B)
+ ("~a" ?\e,Ac\e(B)
+ ("~c" ?\e,Ag\e(B)
+ ("~d" ?\e,Ap\e(B)
+ ("~e" ?\e$,1tL\e(B)
+ ("~g" ?\e$,1 ?\e(B)
+ ("~n" ?\e,Aq\e(B)
+ ("~o" ?\e,Au\e(B)
+ ("~o" ?\e$,1 A\e(B)
+ ("~p" ?\e,A6\e(B)
+ ("~s" ?\e,A'\e(B)
+ ("~s" ?\e$,1 \7f\e(B)
+ ("~s" ?\e$,1!!\e(B)
+ ("~t" ?\e,A~\e(B)
+ ("~u" ?\e,A5\e(B)
+ ("~u" ?\e$,1!-\e(B)
+ ("~x" ?\e,A$\e(B)
+ ("~z" ?\e$,1!>\e(B)
+ ("~|" ?\e,A&\e(B)
+ ("~~" ?\e,A8\e(B)
+)
 ;;; latin-pre.el ends here