1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: utf-8;-*-
3 ;; Copyright (C) 1997-2016 Free Software Foundation, Inc.
4 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
5 ;; 2006, 2007, 2008, 2009, 2010, 2011
6 ;; National Institute of Advanced Industrial Science and Technology (AIST)
7 ;; Registration Number H14PRO021
9 ;; Keywords: mule, multilingual, latin, input method
11 ;; This file is part of GNU Emacs.
13 ;; GNU Emacs is free software: you can redistribute it and/or modify
14 ;; it under the terms of the GNU General Public License as published by
15 ;; the Free Software Foundation, either version 3 of the License, or
16 ;; (at your option) any later version.
18 ;; GNU Emacs is distributed in the hope that it will be useful,
19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 ;; GNU General Public License for more details.
23 ;; You should have received a copy of the GNU General Public License
24 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
28 ;; Key translation maps were originally copied from iso-acc.el.
29 ;; latin-1-prefix: extra special characters added, adapted from the vim
30 ;; digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>)
31 ;; by R.F. Smith <rsmith@xs4all.nl>
34 ;; Author: Włodek Bzyl <matwb@univ.gda.pl>
35 ;; Maintainer: Włodek Bzyl <matwb@univ.gda.pl>
37 ;; latin-[89]-prefix: Dave Love <fx@gnu.org>
39 ;; You might make extra input sequences on the basis of the X
40 ;; locale/*/Compose files (which have both prefix and postfix
41 ;; sequences), but bear in mind that sequences which are logical in
42 ;; that context may not be sensible when they're not signaled with
43 ;; the Compose key. An example is a double space for NBSP.
50 "latin-1-prefix" "Latin-1" "1>" t
51 "Latin-1 characters input method with prefix modifiers
53 effect | prefix | examples
54 ------------+--------+----------
55 acute | \\=' | \\='a -> á, \\='\\=' -> ´
56 grave | \\=` | \\=`a -> à
57 circumflex | ^ | ^a -> â
58 diaeresis | \" | \"a -> ä \"\" -> ¨
61 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
62 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
63 | ~ | ~s -> § ~x -> ¤ ~. -> · ~$ -> £ ~u -> µ
64 | ~ | ~p -> ¶ ~- -> ~= -> ¯ ~| -> ¦
65 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
66 | _ / | _: -> ÷ /c -> ¢ /2 -> ½ /4 -> ¼ /3 -> ¾
68 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
69 " nil t nil nil nil nil nil nil nil nil t)
153 ;; Symbols added by Roland Smith <rsmith@xs4all.nl>
180 (quail-define-package
181 "catalan-prefix" "Latin-1" "CA>" t
182 "Catalan and Spanish input method with prefix modifiers
184 effect | prefix | examples
185 ------------+--------+----------
186 acute | \\=' | \\='a -> á \\='\\=' -> ´
187 grave | \\=` | \\=`a -> à
188 diaeresis | \" | \"i -> ï \"\" -> ¨
190 cedilla | ~ | ~c -> ç
191 middle dot | ~ | ~. -> ·
192 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
193 " nil t nil nil nil nil nil nil nil nil t)
231 (quail-define-package
232 "esperanto-prefix" "Latin-3" "EO>" t
233 "Esperanto input method with prefix modifiers
234 Key translation rules are:
235 ^H -> ?Ĥ ^J -> ?Ĵ ^h -> ?ĥ ^j -> ?ĵ ^C -> ?Ĉ ^G -> ?Ĝ,
236 ^S -> ?Ŝ ^c -> ?ĉ ^g -> ?ĝ ^s -> ?ŝ ~U -> ?Ŭ ~u -> ?ŭ
237 " nil t nil nil nil nil nil nil nil nil t)
257 (quail-define-package
258 "french-prefix" "French" "FR>" t
259 "French (Français) input method with prefix modifiers
261 effect | prefix | examples
262 ------------+--------+----------
263 acute | \\=' | \\='e -> é
264 grave | \\=` | \\=`a -> à
265 circumflex | ^ | ^a -> â
266 diaeresis | \" | \"i -> ï
267 cedilla | ~ or , | ~c -> ç ,c -> ç
268 symbol | ~ | ~> -> » ~< -> «
270 " nil t nil nil nil nil nil nil nil nil t)
314 (quail-define-package
315 "romanian-prefix" "Romanian" "RO>" t
316 "Romanian (româneşte) input method with prefix modifiers
318 effect | prefix | examples
319 ------------+--------+------------------
321 circumflex | ^ | ^a -> â, ^i -> î
322 cedilla | , | ,s -> ş, ,t -> ţ
326 " nil t nil nil nil nil nil nil nil nil t)
334 ("^^" ?^) ("~~" ?~) (",," ?,))
336 (quail-define-package
337 "romanian-alt-prefix" "Romanian" "RO>" t
338 "Alternative Romanian (româneşte) input method with prefix modifiers
340 effect | prefix | examples
341 ------------+--------+------------------
342 tilde | \" | \"a -> â
343 circumflex | \\=' | \\='a -> â, \\='i -> î
344 cedilla | \\=' | \\='s -> ş, \\='t -> ţ
345 \\=' | \\=' | \\='\\=' -> \\='
347 " nil t nil nil nil nil nil nil nil nil t)
351 ("\"A" ?Â) ("\"a" ?â)
355 ("''" ?') ("\"\"" ?\"))
357 (quail-define-package
358 "german-prefix" "German" "DE>" t
359 "German (Deutsch) input method with prefix modifiers
360 Key translation rules are:
361 \"A -> Ä -> \"O -> Ö \"U -> Ü \"s -> ß
362 " nil t nil nil nil nil nil nil nil nil t)
375 (quail-define-package
376 "irish-prefix" "Latin-1" "GA>" t
377 "Irish input method with prefix modifiers
378 Key translation rules are:
379 \\='A -> Á \\='E -> É \\='I -> Í \\='O -> Ó \\='U -> Ú
380 " nil t nil nil nil nil nil nil nil nil t)
396 (quail-define-package
397 "portuguese-prefix" "Latin-1" "PT>" t
398 "Portuguese input method with prefix modifiers
400 effect | prefix | examples
401 ------------+--------+----------
402 acute | \\=' | \\='a -> á \\='\\=' -> ´
403 grave | \\=` | \\=`a -> à
404 circumflex | ^ | ^a -> â
405 diaeresis | \" | \"u -> ü
407 cedilla | \\=' or , | \\='c -> ç ,c -> ç
408 " nil t nil nil nil nil nil nil nil nil t)
447 (quail-define-package
448 "spanish-prefix" "Spanish" "ES>" t
449 "Spanish (Español) input method with prefix modifiers
451 effect | prefix | examples
452 ------------+--------+----------
453 acute | \\=' | \\='a -> á
454 diaeresis | \" | \"u -> ü
456 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
457 " nil t nil nil nil nil nil nil nil nil t)
483 (quail-define-package
484 "latin-2-prefix" "Latin-2" "2>" t
485 "Latin-2 characters input method with prefix modifiers
487 effect | prefix | examples
488 ------------+--------+----------
489 acute | \\=' | \\='a -> á \\='\\=' -> ?´
490 circumflex | ^ | ^a -> â
491 diaeresis | \" | \"a -> ä \"\" -> ¨
494 cedilla | \\=` | \\=`c -> ç \\=`e -> ?ę
495 misc | \\=' \\=` ~ | \\='d -> đ \\=`l -> ł \\=`z -> ż ~o -> ő ~u -> ű
496 symbol | ~ | \\=`. -> ˙ ~~ -> ˘ ~. -> ?¸
497 " nil t nil nil nil nil nil nil nil nil t)
594 (quail-define-package
595 "latin-3-prefix" "Latin-3" "3>" t
596 "Latin-3 characters input method with prefix modifiers
598 effect | prefix | examples
599 ------------+--------+----------
600 acute | \\=' | \\='a -> á \\='\\=' -> ?´
601 grave | \\=` | \\=`a -> à
602 circumflex | ^ | ^a -> â
603 diaeresis | \" | \"a -> ä \"\" -> ¨
604 cedilla | ~ | ~c -> ç ~s -> ş ~~ -> ¸
605 dot above | / . | /g -> ġ .o -> ġ
606 misc | \" ~ / | \"s -> ß ~g -> ğ ~u -> ŭ /h -> ħ /i -> ı
607 symbol | ~ | ~\\=` -> ˘ /# -> £ /$ -> ¤ // -> °
608 " nil t nil nil nil nil nil nil nil nil t)
708 (quail-define-package
709 "polish-slash" "Polish" "PL>" nil
710 "Polish diacritics and slash character are input as `/[acelnosxzACELNOSXZ/]'.
711 For example, the character named `aogonek' is obtained by `/a'."
712 nil t t nil nil nil nil nil nil nil t)
735 (quail-define-package
736 "latin-9-prefix" "Latin-9" "0>" t
737 "Latin-9 characters input method with prefix modifiers
739 effect | prefix | examples
740 ------------+--------+----------
741 acute | \\=' | \\='a -> á
742 grave | \\=` | \\=`a -> à
743 circumflex | ^ | ^a -> â
744 diaeresis | \" | \"a -> ä, \"Y -> Ÿ
747 cedilla | ~ | ~c -> ç
748 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
750 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ž
751 | ~ | ~s -> § ~e -> € ~. -> · ~$ -> £ ~u -> µ
752 | ~ | ~- -> ~= -> ¯
753 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
754 | _ / | _: -> ÷ /c -> ¢ ~p -> ¶
756 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ _a -> ª
757 " nil t nil nil nil nil nil nil nil nil t)
848 ("/o" ?œ) ; clash with ø, but æ uses /
853 ;; Is this the best option for Euro entry?
867 ;; Latin-8 was done by an Englishman -- Johnny Celt should take a
870 (quail-define-package
871 "latin-8-prefix" "Latin-8" "8>" t
872 "Latin-8 characters input method with prefix modifiers
874 effect | prefix | examples
875 ------------+--------+----------
876 acute | \\=' | \\='a -> á
877 grave | \\=` | \\=`a -> à
878 circumflex | ^ | ^w -> ŵ
879 diaeresis | \" | \"a -> ä
880 dot above | . | .b -> ḃ
882 cedilla | ~ | ~c -> ç
883 misc | \" ~ / | \"s -> ß /a -> å /e -> æ /o -> ø
884 | ~ | ~s -> § ~$ -> £ ~p -> ¶
885 symbol | ^ | ^r -> ® ^c -> ©
886 " nil t nil nil nil nil nil nil nil nil t)
888 ;; Basically following Latin-1, plus dottiness from Latin-3.
993 (quail-define-package
994 "latin-prefix" "Latin" "L>" t
995 "Latin characters input method with prefix modifiers.
996 This is the union of various input methods originally made for input
997 of characters from a single Latin-N charset.
999 effect | prefix | examples
1000 ------------+--------+----------
1001 acute | \\=' | \\='a -> á, \\='\\=' -> ´
1002 grave | \\=` | \\=`a -> à
1003 circumflex | ^ | ^a -> â
1004 diaeresis | \" | \"a -> ä \"\" -> ¨
1006 cedilla | ~ | ~c -> ç
1009 dot above | ~ / . | ~o -> ġ /o -> ġ .o -> ġ
1010 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
1011 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
1012 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
1013 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
1014 " nil t nil nil nil nil nil nil nil nil t)
1196 ;;; latin-pre.el ends here