[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/leim/quail/latin-pre.el [emacs-unicode-2]
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/leim/quail/latin-pre.el [emacs-unicode-2] |
Date: |
Mon, 08 Sep 2003 08:45:47 -0400 |
Index: emacs/leim/quail/latin-pre.el
diff -c /dev/null emacs/leim/quail/latin-pre.el:1.24.4.1
*** /dev/null Mon Sep 8 08:45:47 2003
--- emacs/leim/quail/latin-pre.el Mon Sep 8 08:45:39 2003
***************
*** 0 ****
--- 1,1186 ----
+ ;;; latin-pre.el --- Quail packages for inputting various European characters
-*-coding: utf-8;-*-
+
+ ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
+ ;; Licensed to the Free Software Foundation.
+ ;; Copyright (C) 2000, 2002 Free Software Foundation, Inc.
+
+ ;; Keywords: mule, multilingual, latin, input method
+
+ ;; This file is part of GNU Emacs.
+
+ ;; GNU Emacs is free software; you can redistribute it and/or modify
+ ;; it under the terms of the GNU General Public License as published by
+ ;; the Free Software Foundation; either version 2, or (at your option)
+ ;; any later version.
+
+ ;; GNU Emacs is distributed in the hope that it will be useful,
+ ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+ ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ ;; GNU General Public License for more details.
+
+ ;; You should have received a copy of the GNU General Public License
+ ;; along with GNU Emacs; see the file COPYING. If not, write to the
+ ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ ;; Boston, MA 02111-1307, USA.
+
+ ;;; Commentary:
+
+ ;; Key translation maps were originally copied from iso-acc.el.
+ ;; latin-1-prefix: extra special characters added, adapted from the vim
+ ;; digraphs (from J.H.M.Dassen <address@hidden>)
+ ;; by R.F. Smith <address@hidden>
+ ;;
+ ;; polish-slash:
+ ;; Author: WÅodek Bzyl <address@hidden>
+ ;; Maintainer: WÅodek Bzyl <address@hidden>
+ ;;
+ ;; latin-[89]-prefix: Dave Love <address@hidden>
+
+ ;; You might make extra input sequences on the basis of the X
+ ;; locale/*/Compose files (which have both prefix and postfix
+ ;; sequences), but bear in mind that sequences which are logical in
+ ;; that context may not be sensible when they're not signalled with
+ ;; the Compose key. An example is a double space for NBSP.
+
+ ;;; Code:
+
+ (require 'quail)
+
+ (quail-define-package
+ "latin-1-prefix" "Latin-1" "1>" t
+ "Latin-1 characters input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á, '' -> ´
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"a -> ä \"\" -> ¨
+ tilde | ~ | ~a -> ã
+ cedilla | ~ | ~c -> ç
+ misc | \" ~ / | \"s -> à ~d -> ð ~t -> þ /a -> å /e -> æ
/o -> ø
+ symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
+ | ~ | ~s -> § ~x -> ¤ ~. -> · ~$ -> £ ~u -> µ
+ | ~ | ~p -> ¶ ~- ->  ~= -> ¯ ~| -> ¦
+ symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> à _y -> ¥
+ | _ / | _: -> ÷ /c -> ¢ /2 -> ½ /4 -> ¼ /3 -> ¾
+ | _ / | /= -> ¬
+ symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'Y" ?Ã)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("'y" ?ý)
+ ("''" ?´)
+ ("' " ?')
+ ("`A" ?Ã)
+ ("`E" ?Ã)
+ ("`I" ?Ã)
+ ("`O" ?Ã)
+ ("`U" ?Ã)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`i" ?ì)
+ ("`o" ?ò)
+ ("`u" ?ù)
+ ("``" ?`)
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^E" ?Ã)
+ ("^I" ?Ã)
+ ("^O" ?Ã)
+ ("^U" ?Ã)
+ ("^a" ?â)
+ ("^e" ?ê)
+ ("^i" ?î)
+ ("^o" ?ô)
+ ("^u" ?û)
+ ("^^" ?^)
+ ("^ " ?^)
+ ("\"A" ?Ã)
+ ("\"E" ?Ã)
+ ("\"I" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"a" ?ä)
+ ("\"e" ?ë)
+ ("\"i" ?ï)
+ ("\"o" ?ö)
+ ("\"s" ?Ã)
+ ("\"u" ?ü)
+ ("\"y" ?ÿ)
+ ("\"\"" ?¨)
+ ("\" " ?\")
+ ("~A" ?Ã)
+ ("~C" ?Ã)
+ ("~D" ?Ã)
+ ("~N" ?Ã)
+ ("~O" ?Ã)
+ ("~T" ?Ã)
+ ("~a" ?ã)
+ ("~c" ?ç)
+ ("~d" ?ð)
+ ("~n" ?ñ)
+ ("~o" ?õ)
+ ("~t" ?þ)
+ ("~>" ?\»)
+ ("~<" ?\«)
+ ("~!" ?¡)
+ ("~?" ?¿)
+ ("~~" ?¸)
+ ("~ " ?~)
+ ("/A" ?Ã
)
+ ("/E" ?Ã)
+ ("/O" ?Ã)
+ ("/a" ?Ã¥)
+ ("/e" ?æ)
+ ("/o" ?ø)
+ ("//" ?°)
+ ("/ " ?/)
+ ("_o" ?º)
+ ("_a" ?ª)
+ ("_ " ? )
+ ;; Symbols added by Roland Smith <address@hidden>
+ ("_+" ?±)
+ ("_y" ?Â¥)
+ ("_:" ?÷)
+ ("/c" ?¢)
+ ("/\\" ?Ã)
+ ("/2" ?½)
+ ("/4" ?¼)
+ ("/3" ?¾)
+ ("~s" ?§)
+ ("~p" ?¶)
+ ("~x" ?¤)
+ ("~." ?·)
+ ("~$" ?£)
+ ("~u" ?µ)
+ ("^r" ?®)
+ ("^c" ?©)
+ ("^1" ?¹)
+ ("^2" ?²)
+ ("^3" ?³)
+ ("~-" ?Â)
+ ("~|" ?¦)
+ ("/=" ?¬)
+ ("~=" ?¯)
+ )
+
+ (quail-define-package
+ "catalan-prefix" "Latin-1" "CA>" t
+ "Catalan and Spanish input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á '' -> ´
+ grave | ` | `a -> Ã
+ diaeresis | \" | \"i -> ï \"\" -> ¨
+ tilde | ~ | ~n -> ñ
+ cedilla | ~ | ~c -> ç
+ symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
+ " 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" ?Ã)
+ ("`E" ?Ã)
+ ("`O" ?Ã)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`o" ?ò)
+ ("` " ?`)
+ ("\"I" ?Ã)
+ ("\"U" ?Ã)
+ ("\"i" ?ï)
+ ("\"u" ?ü)
+ ("\" " ?\")
+ ("~C" ?Ã)
+ ("~N" ?Ã)
+ ("~c" ?ç)
+ ("~n" ?ñ)
+ ("~>" ?\»)
+ ("~<" ?\«)
+ ("~!" ?¡)
+ ("~?" ?¿)
+ ("~ " ?~)
+ )
+
+ (quail-define-package
+ "esperanto-prefix" "Latin-3" "EO>" t
+ "Esperanto input method with prefix modifiers
+ Key translation rules are:
+ ^H -> ?Ĥ ^J -> ?Ä´ ^h -> ?Ä¥ ^j -> ?ĵ ^C -> ?Ä ^G -> ?Ä,
+ ^S -> ?Å ^c -> ?Ä ^g -> ?Ä ^s -> ?Å ~U -> ?Ŭ ~u -> ?Å
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("^H" ?Ĥ)
+ ("^J" ?Ä´)
+ ("^h" ?Ä¥)
+ ("^j" ?ĵ)
+ ("^C" ?Ä)
+ ("^G" ?Ä)
+ ("^S" ?Å)
+ ("^c" ?Ä)
+ ("^g" ?Ä)
+ ("^s" ?Å)
+ ("^^" ?^)
+ ("^ " ?^)
+ ("~U" ?Ŭ)
+ ("~u" ?Å)
+ ("~ " ?~)
+ )
+
+ (quail-define-package
+ "french-prefix" "French" "FR>" t
+ "French (Français) input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'e -> é
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"i -> ï
+ cedilla | ~ or , | ~c -> ç ,c -> ç
+ symbol | ~ | ~> -> » ~< -> «
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'E" ?Ã)
+ ("'C" ?Ã)
+ ("'e" ?é)
+ ("'c" ?ç)
+ ("' " ?')
+ ("`A" ?Ã)
+ ("`E" ?Ã)
+ ("`U" ?Ã)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`u" ?ù)
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^E" ?Ã)
+ ("^I" ?Ã)
+ ("^O" ?Ã)
+ ("^U" ?Ã)
+ ("^a" ?â)
+ ("^e" ?ê)
+ ("^i" ?î)
+ ("^o" ?ô)
+ ("^u" ?û)
+ ("^ " ?^)
+ ("\"E" ?Ã)
+ ("\"I" ?Ã)
+ ("\"e" ?ë)
+ ("\"i" ?ï)
+ ("\" " ?\")
+ ("~<" ?\«)
+ ("~>" ?\»)
+ ("~C" ?Ã)
+ ("~c" ?ç)
+ ("~ " ?~)
+ (",C" ?Ã)
+ (",c" ?ç)
+ (", " ?,)
+ )
+
+ (quail-define-package
+ "romanian-prefix" "Romanian" "RO>" t
+ "Romanian (româneÅte) input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+------------------
+ tilde | ~ | ~a -> Ä
+ circumflex | ^ | ^a -> â, ^i -> î
+ cedilla | , | ,s -> Å, ,t -> Å£
+ ~ | ~ | ~~ -> ~
+ ^ | ^ | ^^ -> ^
+ , | , | ,, -> ,
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("~A" ?Ä) ("~a" ?Ä)
+ ("^A" ?Ã) ("^a" ?â)
+ ("^I" ?Ã) ("^i" ?î)
+ (",S" ?Å) (",s" ?Å)
+ (",T" ?Å¢) (",t" ?Å£)
+ ("^^" ?^) ("~~" ?~) (",," ?,))
+
+ (quail-define-package
+ "romanian-alt-prefix" "Romanian" "RO>" t
+ "Alternative Romanian (româneÅte) input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+------------------
+ tilde | \" | \"a -> â
+ circumflex | ' | 'a -> â, 'i -> î
+ cedilla | ' | 's -> Å, 't -> Å£
+ ' | ' | '' -> '
+ \" | \" | \"\" -> \"
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ä) ("'a" ?Ä)
+ ("\"A" ?Ã) ("\"a" ?â)
+ ("'I" ?Ã) ("'i" ?î)
+ ("'S" ?Å) ("'s" ?Å)
+ ("'T" ?Å¢) ("'t" ?Å£)
+ ("''" ?') ("\"\"" ?\"))
+
+ (quail-define-package
+ "german-prefix" "German" "DE>" t
+ "German (Deutsch) input method with prefix modifiers
+ Key translation rules are:
+ \"A -> Ã -> \"O -> Ã \"U -> Ã \"s -> ?Ã
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("\"A" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"a" ?ä)
+ ("\"o" ?ö)
+ ("\"u" ?ü)
+ ("\"s" ?Ã)
+ ("\" " ?\")
+ )
+
+ (quail-define-package
+ "irish-prefix" "Latin-1" "GA>" t
+ "Irish input method with prefix modifiers
+ Key translation rules are:
+ 'A -> Ã 'E -> Ã 'I -> Ã 'O -> Ã 'U -> Ã
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("' " ?')
+ )
+
+ (quail-define-package
+ "portuguese-prefix" "Latin-1" "PT>" t
+ "Portuguese input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á '' -> ´
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"u -> ü
+ tilde | ~ | ~a -> ã
+ cedilla | ' or , | 'c -> ç ,c -> ç
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'C" ?Ã)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("'c" ?ç)
+ ("' " ?')
+ ("`A" ?Ã)
+ ("`a" ?Ã )
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^E" ?Ã)
+ ("^O" ?Ã)
+ ("^a" ?â)
+ ("^e" ?ê)
+ ("^o" ?ô)
+ ("^ " ?^)
+ ("\"U" ?Ã)
+ ("\"u" ?ü)
+ ("\" " ?\")
+ ("~A" ?Ã)
+ ("~O" ?Ã)
+ ("~a" ?ã)
+ ("~o" ?õ)
+ ("~ " ?~)
+ (",c" ?ç)
+ (",C" ?Ã)
+ (",," ?,)
+ )
+
+ (quail-define-package
+ "spanish-prefix" "Spanish" "ES>" t
+ "Spanish (Español) input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á
+ diaeresis | \" | \"u -> ü
+ tilde | ~ | ~n -> ñ
+ symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("' " ?')
+ ("\"U" ?Ã)
+ ("\"u" ?ü)
+ ("\" " ?\")
+ ("~N" ?Ã)
+ ("~n" ?ñ)
+ ("~>" ?\»)
+ ("~<" ?\«)
+ ("~!" ?¡)
+ ("~?" ?¿)
+ ("~ " ?~)
+ )
+
+ (quail-define-package
+ "latin-2-prefix" "Latin-2" "2>" t
+ "Latin-2 characters input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á '' -> ?´
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"a -> ä \"\" -> ¨
+ breve | ~ | ~a -> Ä
+ caron | ~ | ~c -> Ä
+ cedilla | ` | `c -> ç `e -> ?Ä
+ misc | ' ` ~ | 'd -> Ä `l -> Å `z -> ż ~o -> Å ~u -> ű
+ symbol | ~ | `. -> Ë ~~ -> Ë ~. -> ?¸
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ã)
+ ("'C" ?Ä)
+ ("'D" ?Ä)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'L" ?Ĺ)
+ ("'N" ?Å)
+ ("'O" ?Ã)
+ ("'R" ?Å)
+ ("'S" ?Å)
+ ("'U" ?Ã)
+ ("'Y" ?Ã)
+ ("'Z" ?Ź)
+ ("'a" ?á)
+ ("'c" ?Ä)
+ ("'d" ?Ä)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'l" ?ĺ)
+ ("'n" ?Å)
+ ("'o" ?ó)
+ ("'r" ?Å)
+ ("'s" ?Å)
+ ("'u" ?ú)
+ ("'y" ?ý)
+ ("'z" ?ź)
+ ("''" ?´)
+ ("' " ?')
+ ("`A" ?Ä)
+ ("`C" ?Ã)
+ ("`E" ?Ä)
+ ("`L" ?Å)
+ ("`S" ?Å)
+ ("`T" ?Å¢)
+ ("`Z" ?Å»)
+ ("`a" ?Ä
)
+ ("`l" ?Å)
+ ("`c" ?ç)
+ ("`e" ?Ä)
+ ("`s" ?Å)
+ ("`t" ?Å£)
+ ("`z" ?ż)
+ ("``" ?Å)
+ ("`." ?Ë)
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^I" ?Ã)
+ ("^O" ?Ã)
+ ("^a" ?â)
+ ("^i" ?î)
+ ("^o" ?ô)
+ ("^^" ?^)
+ ("^ " ?^)
+ ("\"A" ?Ã)
+ ("\"E" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"a" ?ä)
+ ("\"e" ?ë)
+ ("\"o" ?ö)
+ ("\"s" ?Ã)
+ ("\"u" ?ü)
+ ("\"\"" ?¨)
+ ("\" " ?\")
+ ("~A" ?Ä)
+ ("~C" ?Ä)
+ ("~D" ?Ä)
+ ("~E" ?Ä)
+ ("~L" ?Ľ)
+ ("~N" ?Å)
+ ("~O" ?Å)
+ ("~R" ?Å)
+ ("~S" ?Å )
+ ("~T" ?Ť)
+ ("~U" ?Å°)
+ ("~Z" ?Ž)
+ ("~a" ?Ä)
+ ("~c" ?Ä)
+ ("~d" ?Ä)
+ ("~e" ?Ä)
+ ("~l" ?ľ)
+ ("~n" ?Å)
+ ("~o" ?Å)
+ ("~r" ?Å)
+ ("~s" ?Å¡)
+ ("~t" ?Å¥)
+ ("~u" ?ű)
+ ("~z" ?ž)
+ ("~v" ?Ë)
+ ("~~" ?Ë)
+ ("~." ?¸)
+ ("~ " ?~)
+ )
+
+ (quail-define-package
+ "latin-3-prefix" "Latin-3" "3>" t
+ "Latin-3 characters input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á '' -> ?´
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"a -> ä \"\" -> ¨
+ cedilla | ~ | ~c -> ç ~s -> Š~~ -> ¸
+ dot above | / . | /g -> Ä¡ .o -> Ä¡
+ misc | \" ~ / | \"s -> à ~g -> Ä ~u -> Å /h -> ħ /i -> ı
+ symbol | ~ | ~` -> Ë /# -> £ /$ -> ¤ // -> °
+ " 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" ?Ã)
+ ("`E" ?Ã)
+ ("`I" ?Ã)
+ ("`O" ?Ã)
+ ("`U" ?Ã)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`i" ?ì)
+ ("`o" ?ò)
+ ("`u" ?ù)
+ ("``" ?`)
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^C" ?Ä)
+ ("^E" ?Ã)
+ ("^G" ?Ä)
+ ("^H" ?Ĥ)
+ ("^I" ?Ã)
+ ("^J" ?Ä´)
+ ("^O" ?Ã)
+ ("^S" ?Å)
+ ("^U" ?Ã)
+ ("^a" ?â)
+ ("^c" ?Ä)
+ ("^e" ?ê)
+ ("^g" ?Ä)
+ ("^h" ?Ä¥)
+ ("^i" ?î)
+ ("^j" ?ĵ)
+ ("^o" ?ô)
+ ("^s" ?Å)
+ ("^u" ?û)
+ ("^^" ?^)
+ ("^ " ?^)
+ ("\"A" ?Ã)
+ ("\"E" ?Ã)
+ ("\"I" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"a" ?ä)
+ ("\"e" ?ë)
+ ("\"i" ?ï)
+ ("\"o" ?ö)
+ ("\"u" ?ü)
+ ("\"s" ?Ã)
+ ("\"\"" ?¨)
+ ("\" " ?\")
+ ("~C" ?Ã)
+ ("~N" ?Ã)
+ ("~c" ?ç)
+ ("~n" ?ñ)
+ ("~S" ?Å)
+ ("~s" ?Å)
+ ("~G" ?Ä)
+ ("~g" ?Ä)
+ ("~U" ?Ŭ)
+ ("~u" ?Å)
+ ("~`" ?Ë)
+ ("~~" ?¸)
+ ("~ " ?~)
+ ("/C" ?Ä)
+ ("/G" ?Ä )
+ ("/H" ?Ħ)
+ ("/I" ?Ä°)
+ ("/Z" ?Å»)
+ ("/c" ?Ä)
+ ("/g" ?Ä¡)
+ ("/h" ?ħ)
+ ("/i" ?ı)
+ ("/z" ?ż)
+ ("/." ?Ë)
+ ("/#" ?£)
+ ("/$" ?¤)
+ ("//" ?°)
+ ("/ " ?/)
+ (".C" ?Ä)
+ (".G" ?Ä )
+ (".I" ?Ä°)
+ (".Z" ?Å»)
+ (".c" ?Ä)
+ (".g" ?Ä¡)
+ (".z" ?ż)
+ )
+
+
+ (quail-define-package
+ "polish-slash" "Polish" "PL>" nil
+ "Polish diacritics and slash character are input as `/[acelnosxzACELNOSXZ/]'.
+ For example, the character named `aogonek' is obtained by `/a'."
+ nil t t t nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("//" ?/)
+ ("/a" ?Ä
)
+ ("/c" ?Ä)
+ ("/e" ?Ä)
+ ("/l" ?Å)
+ ("/n" ?Å)
+ ("/o" ?ó)
+ ("/s" ?Å)
+ ("/x" ?ź)
+ ("/z" ?ż)
+ ("/A" ?Ä)
+ ("/C" ?Ä)
+ ("/E" ?Ä)
+ ("/L" ?Å)
+ ("/N" ?Å)
+ ("/O" ?Ã)
+ ("/S" ?Å)
+ ("/X" ?Ź)
+ ("/Z" ?Å»))
+
+ (quail-define-package
+ "latin-9-prefix" "Latin-9" "0>" t
+ "Latin-9 characters input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"a -> ä, \"Y -> Ÿ
+ tilde | ~ | ~a -> ã
+ caron | ~ | ~z -> ž
+ cedilla | ~ | ~c -> ç
+ misc | \" ~ / | \"s -> à ~d -> ð ~t -> þ /a -> å /e -> æ
/o -> ø
+ | \" ~ / | /o -> Å
+ symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ž
+ | ~ | ~s -> § ~e -> ⬠~. -> · ~$ -> £ ~u -> µ
+ | ~ | ~- ->  ~= -> ¯
+ symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> à _y -> ¥
+ | _ / | _: -> ÷ /c -> ¢ ~p -> ¶
+ | _ / | /= -> ¬
+ symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ _a
-> ª
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'Y" ?Ã)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("'y" ?ý)
+ ("' " ?')
+ ("`A" ?Ã)
+ ("`E" ?Ã)
+ ("`I" ?Ã)
+ ("`O" ?Ã)
+ ("`U" ?Ã)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`i" ?ì)
+ ("`o" ?ò)
+ ("`u" ?ù)
+ ("``" ?`)
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^E" ?Ã)
+ ("^I" ?Ã)
+ ("^O" ?Ã)
+ ("^U" ?Ã)
+ ("^a" ?â)
+ ("^e" ?ê)
+ ("^i" ?î)
+ ("^o" ?ô)
+ ("^u" ?û)
+ ("^^" ?^)
+ ("^ " ?^)
+ ("\"A" ?Ã)
+ ("\"E" ?Ã)
+ ("\"I" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"a" ?ä)
+ ("\"e" ?ë)
+ ("\"i" ?ï)
+ ("\"o" ?ö)
+ ("\"s" ?Ã)
+ ("\"u" ?ü)
+ ("\"y" ?ÿ)
+ ("\" " ?\")
+ ("~A" ?Ã)
+ ("~C" ?Ã)
+ ("~D" ?Ã)
+ ("~N" ?Ã)
+ ("~O" ?Ã)
+ ("~S" ?Å )
+ ("~T" ?Ã)
+ ("~Z" ?Ž)
+ ("~a" ?ã)
+ ("~c" ?ç)
+ ("~d" ?ð)
+ ("~n" ?ñ)
+ ("~o" ?õ)
+ ("~s" ?Å¡)
+ ("~t" ?þ)
+ ("~z" ?ž)
+ ("~>" ?\»)
+ ("~<" ?\«)
+ ("~!" ?¡)
+ ("~?" ?¿)
+ ("~ " ?~)
+ ("/A" ?Ã
)
+ ("/E" ?Ã)
+ ("/O" ?Ã)
+ ("/a" ?Ã¥)
+ ("/e" ?æ)
+ ("/o" ?ø)
+ ("//" ?°)
+ ("/ " ?/)
+ ("_o" ?º)
+ ("_a" ?ª)
+ ("_+" ?±)
+ ("_y" ?Â¥)
+ ("_:" ?÷)
+ ("/c" ?¢)
+ ("/\\" ?Ã)
+ ("/o" ?Å) ; clash with ø, but æ uses /
+ ("/O" ?Å)
+ ("\"Y" ?Ÿ)
+ ("~s" ?§)
+ ("~p" ?¶)
+ ;; Is this the best option for Euro entry?
+ ("~e" ?â¬)
+ ("~." ?·)
+ ("~$" ?£)
+ ("~u" ?µ)
+ ("^r" ?®)
+ ("^c" ?©)
+ ("^1" ?¹)
+ ("^2" ?²)
+ ("^3" ?³)
+ ("~-" ?Â)
+ ("~=" ?¯)
+ ("/=" ?¬))
+
+ ;; Latin-8 was done by an Englishman -- Johnny Celt should take a
+ ;; squint at it.
+
+ (quail-define-package
+ "latin-8-prefix" "Latin-8" "8>" t
+ "Latin-8 characters input method with prefix modifiers
+
+ effect | prefix | examples
+ ------------+--------+----------
+ acute | ' | 'a -> á
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^w -> ŵ
+ diaeresis | \" | \"a -> ä
+ dot above | . | .b -> á¸
+ tilde | ~ | ~a -> ã
+ cedilla | ~ | ~c -> ç
+ misc | \" ~ / | \"s -> à /a -> å /e -> æ /o -> ø
+ | ~ | ~s -> § ~$ -> £ ~p -> ¶
+ symbol | ^ | ^r -> ® ^c -> ©
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ ;; Basically following Latin-1, plus dottiness from Latin-3.
+ (quail-define-rules
+ (".B" ?á¸)
+ (".b" ?á¸)
+ (".c" ?Ä)
+ (".C" ?Ä)
+ (".D" ?á¸)
+ (".d" ?á¸)
+ (".f" ?á¸)
+ (".F" ?á¸)
+ (".g" ?Ä¡)
+ (".G" ?Ä )
+ (".m" ?á¹)
+ (".M" ?á¹)
+ (".p" ?á¹)
+ (".P" ?á¹)
+ (".s" ?ṡ)
+ (".S" ?á¹ )
+ (".t" ?ṫ)
+ (".T" ?Ṫ)
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'Y" ?Ã)
+ ("'W" ?áº)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("'w" ?áº)
+ ("'y" ?ý)
+ ("' " ?')
+ ("`A" ?Ã)
+ ("`E" ?Ã)
+ ("`I" ?Ã)
+ ("`O" ?Ã)
+ ("`U" ?Ã)
+ ("`W" ?áº)
+ ("`Y" ?Ỳ)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`i" ?ì)
+ ("`o" ?ò)
+ ("`u" ?ù)
+ ("`w" ?áº)
+ ("`y" ?ỳ)
+ ("``" ?`)
+ ("` " ?`)
+ ("^A" ?Ã)
+ ("^E" ?Ã)
+ ("^I" ?Ã)
+ ("^O" ?Ã)
+ ("^U" ?Ã)
+ ("^a" ?â)
+ ("^e" ?ê)
+ ("^i" ?î)
+ ("^o" ?ô)
+ ("^u" ?û)
+ ("^w" ?ŵ)
+ ("^W" ?Å´)
+ ("^y" ?Å·)
+ ("^Y" ?Ŷ)
+ ("^^" ?^)
+ ("^ " ?^)
+ ("\"A" ?Ã)
+ ("\"E" ?Ã)
+ ("\"I" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"a" ?ä)
+ ("\"e" ?ë)
+ ("\"i" ?ï)
+ ("\"o" ?ö)
+ ("\"s" ?Ã)
+ ("\"u" ?ü)
+ ("\"w" ?áº
)
+ ("\"W" ?áº)
+ ("\"y" ?ÿ)
+ ("\"Y" ?Ÿ)
+ ("\" " ?\")
+ ("~A" ?Ã)
+ ("~C" ?Ã)
+ ("~N" ?Ã)
+ ("~O" ?Ã)
+ ("~a" ?ã)
+ ("~c" ?ç)
+ ("~n" ?ñ)
+ ("~o" ?õ)
+ ("~ " ?~)
+ ("/A" ?Ã
)
+ ("/E" ?Ã)
+ ("/O" ?Ã)
+ ("/a" ?Ã¥)
+ ("/e" ?æ)
+ ("/o" ?ø)
+ ("/ " ?/)
+ ("~p" ?¶)
+ ("~s" ?§)
+ ("~$" ?£)
+ ("^r" ?®)
+ ("^c" ?©))
+
+ (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 -> á, '' -> ´
+ grave | ` | `a -> Ã
+ circumflex | ^ | ^a -> â
+ diaeresis | \" | \"a -> ä \"\" -> ¨
+ tilde | ~ | ~a -> ã
+ cedilla | ~ | ~c -> ç
+ breve | ~ | ~a -> Ä
+ caron | ~ | ~c -> Ä
+ dot above | ~ / . | ~o -> Ä¡ /o -> Ä¡ .o -> Ä¡
+ misc | \" ~ / | \"s -> à ~d -> ð ~t -> þ /a -> å /e -> æ
/o -> ø
+ symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
+ symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> à _y -> ¥
+ symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
+ " nil t nil nil nil nil nil nil nil nil t)
+
+ (quail-define-rules
+ ("' " ?')
+ ("''" ?´)
+ ("'A" ?Ã)
+ ("'E" ?Ã)
+ ("'I" ?Ã)
+ ("'O" ?Ã)
+ ("'U" ?Ã)
+ ("'W" ?áº)
+ ("'Y" ?Ã)
+ ("'a" ?á)
+ ("'e" ?é)
+ ("'i" ?Ã)
+ ("'o" ?ó)
+ ("'u" ?ú)
+ ("'w" ?áº)
+ ("'y" ?ý)
+ (".B" ?á¸)
+ (".C" ?Ä)
+ (".D" ?á¸)
+ (".F" ?á¸)
+ (".G" ?Ä )
+ (".I" ?Ä°)
+ (".M" ?á¹)
+ (".P" ?á¹)
+ (".S" ?á¹ )
+ (".T" ?Ṫ)
+ (".Z" ?Å»)
+ (".b" ?á¸)
+ (".c" ?Ä)
+ (".d" ?á¸)
+ (".f" ?á¸)
+ (".g" ?Ä¡)
+ (".m" ?á¹)
+ (".p" ?á¹)
+ (".s" ?ṡ)
+ (".t" ?ṫ)
+ (".z" ?ż)
+ ("/ " ?/)
+ ("/#" ?£)
+ ("/$" ?¤)
+ ("/." ?Ë)
+ ("//" ?°)
+ ("/2" ?½)
+ ("/3" ?¾)
+ ("/4" ?¼)
+ ("/=" ?¬)
+ ("/A" ?Ã
)
+ ("/C" ?Ä)
+ ("/E" ?Ã)
+ ("/G" ?Ä )
+ ("/H" ?Ħ)
+ ("/I" ?Ä°)
+ ("/O" ?Ã)
+ ("/O" ?Å)
+ ("/Z" ?Å»)
+ ("/\\" ?Ã)
+ ("/a" ?Ã¥)
+ ("/c" ?¢)
+ ("/c" ?Ä)
+ ("/e" ?æ)
+ ("/g" ?Ä¡)
+ ("/h" ?ħ)
+ ("/i" ?ı)
+ ("/o" ?ø)
+ ("/o" ?Å)
+ ("/z" ?ż)
+ ("\" " ?\")
+ ("\"A" ?Ã)
+ ("\"E" ?Ã)
+ ("\"I" ?Ã)
+ ("\"O" ?Ã)
+ ("\"U" ?Ã)
+ ("\"W" ?áº)
+ ("\"Y" ?Ÿ)
+ ("\"\"" ?¨)
+ ("\"a" ?ä)
+ ("\"e" ?ë)
+ ("\"i" ?ï)
+ ("\"o" ?ö)
+ ("\"s" ?Ã)
+ ("\"u" ?ü)
+ ("\"w" ?áº
)
+ ("\"y" ?ÿ)
+ ("^ " ?^)
+ ("^1" ?¹)
+ ("^2" ?²)
+ ("^3" ?³)
+ ("^A" ?Ã)
+ ("^C" ?Ä)
+ ("^E" ?Ã)
+ ("^G" ?Ä)
+ ("^H" ?Ĥ)
+ ("^I" ?Ã)
+ ("^J" ?Ä´)
+ ("^O" ?Ã)
+ ("^S" ?Å)
+ ("^U" ?Ã)
+ ("^W" ?Å´)
+ ("^Y" ?Ŷ)
+ ("^^" ?^)
+ ("^a" ?â)
+ ("^c" ?©)
+ ("^c" ?Ä)
+ ("^e" ?ê)
+ ("^g" ?Ä)
+ ("^h" ?Ä¥)
+ ("^i" ?î)
+ ("^j" ?ĵ)
+ ("^o" ?ô)
+ ("^r" ?®)
+ ("^s" ?Å)
+ ("^u" ?û)
+ ("^w" ?ŵ)
+ ("^y" ?Å·)
+ ("_+" ?±)
+ ("_:" ?÷)
+ ("_a" ?ª)
+ ("_o" ?º)
+ ("_y" ?Â¥)
+ ("_ " ? )
+ ("` " ?`)
+ ("`A" ?Ã)
+ ("`E" ?Ã)
+ ("`I" ?Ã)
+ ("`O" ?Ã)
+ ("`U" ?Ã)
+ ("`W" ?áº)
+ ("`Y" ?Ỳ)
+ ("``" ?`)
+ ("`a" ?Ã )
+ ("`e" ?è)
+ ("`i" ?ì)
+ ("`o" ?ò)
+ ("`u" ?ù)
+ ("`w" ?áº)
+ ("`y" ?ỳ)
+ ("~ " ?~)
+ ("~!" ?¡)
+ ("~$" ?£)
+ ("~-" ?Â)
+ ("~." ?·)
+ ("~<" ?\«)
+ ("~=" ?¯)
+ ("~>" ?\»)
+ ("~?" ?¿)
+ ("~A" ?Ã)
+ ("~C" ?Ã)
+ ("~D" ?Ã)
+ ("~G" ?Ä)
+ ("~N" ?Ã)
+ ("~O" ?Ã)
+ ("~O" ?Ä )
+ ("~S" ?Å)
+ ("~S" ?Å )
+ ("~T" ?Ã)
+ ("~U" ?Ŭ)
+ ("~Z" ?Ž)
+ ("~`" ?Ë)
+ ("~a" ?ã)
+ ("~c" ?ç)
+ ("~d" ?ð)
+ ("~e" ?â¬)
+ ("~g" ?Ä)
+ ("~n" ?ñ)
+ ("~o" ?õ)
+ ("~o" ?Ä¡)
+ ("~p" ?¶)
+ ("~s" ?§)
+ ("~s" ?Å)
+ ("~s" ?Å¡)
+ ("~t" ?þ)
+ ("~u" ?µ)
+ ("~u" ?Å)
+ ("~x" ?¤)
+ ("~z" ?ž)
+ ("~|" ?¦)
+ ("~~" ?¸)
+ )
+ ;;; latin-pre.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/leim/quail/latin-pre.el [emacs-unicode-2],
Kenichi Handa <=