]> code.delx.au - gnu-emacs/blobdiff - leim/quail/latin-pre.el
*** empty log message ***
[gnu-emacs] / leim / quail / latin-pre.el
index d86b50d76ababe7edc2d169b4090d2f6690135e3..023dbd444615f7dee91fe1dfa1f07d6d991a848c 100644 (file)
@@ -26,7 +26,7 @@
 ;;; Commentary:
 
 ;; Key translation maps were originally copied from iso-acc.el.
-;; latin-1-prefix: extra special characters added, adapted from the vim 
+;; latin-1-prefix: extra special characters added, adapted from the vim
 ;;                 digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>)
 ;;                 by R.F. Smith <rsmith@xs4all.nl>
 ;;
 ;;
 ;; latin-[89]-prefix: Dave Love <fx@gnu.org>
 
+;; 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)
  ("/ " ?/)
  ("_o" ?º)
  ("_a" ?ª)
+ ("_ " ? )
 ;; Symbols added by Roland Smith <rsmith@xs4all.nl>
  ("_+" ?±)
  ("_y" ?¥)
  ("~|" ?¦)
  ("/=" ?¬)
  ("~=" ?¯)
- ("_ " ? )                            ; nbsp
 )
 
 (quail-define-package
@@ -589,7 +595,7 @@ Key translation rules are:
   circumflex |   ^    | ^a -> â
   diaeresis  |   \"    | \"a -> ä   \"\" -> ¨
    cedilla   |   ~    | ~c -> ç   ~s -> ş   ~~ -> ¸
-  dot above  | ~ / .  | ~o -> ġ   /o -> ġ   .o -> ġ
+  dot above  |   / .  | /g -> ġ   .o -> ġ
     misc     | \" ~ /  | \"s -> ß   ~g -> ğ   ~u -> ŭ   /h -> ħ   /i -> ı
    symbol    |   ~    | ~` -> ˘   /# -> £   /$ -> ¤   // -> °
 " nil t nil nil nil nil nil nil nil nil t)
@@ -656,10 +662,8 @@ Key translation rules are:
  ("\" " ?\")
  ("~C" ?Ç)
  ("~N" ?Ñ)
- ("~O" ?Õ)
  ("~c" ?ç)
  ("~n" ?ñ)
- ("~o" ?õ)
  ("~S" ?Ş)
  ("~s" ?ş)
  ("~G" ?Ğ)
@@ -696,17 +700,18 @@ Key translation rules are:
 
 (quail-define-package
  "polish-slash" "Polish" "PL>" nil
- "Polish diacritics are input as `/[acelnosxzACELNOSXZ]'.
+ "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" ?ó) 
+ ("/o" ?ó)
  ("/s" ?ś)
  ("/x" ?ź)
  ("/z" ?ż)
@@ -715,7 +720,7 @@ For example, the character named `aogonek' is obtained by `/a'."
  ("/E" ?Ę)
  ("/L" ?Ł)
  ("/N" ?Ń)
- ("/O" ?Ó) 
+ ("/O" ?Ó)
  ("/S" ?Ś)
  ("/X" ?Ź)
  ("/Z" ?Ż))
@@ -816,7 +821,6 @@ For example, the character named `aogonek' is obtained by `/a'."
  ("~!" ?¡)
  ("~?" ?¿)
  ("~ " ?~)
- ("~_" ? )
  ("/A" ?Å)
  ("/E" ?Æ)
  ("/O" ?Ø)
@@ -872,7 +876,7 @@ For example, the character named `aogonek' is obtained by `/a'."
    symbol    |   ^    | ^r -> ®  ^c -> ©
 " nil t nil nil nil nil nil nil nil nil t)
 
-;; Basically following Latin-1 plus dottiness from Latin-3.
+;; Basically following Latin-1, plus dottiness from Latin-3.
 (quail-define-rules
  (".B" ?Ḃ)
  (".b" ?ḃ)
@@ -964,7 +968,6 @@ For example, the character named `aogonek' is obtained by `/a'."
  ("~n" ?ñ)
  ("~o" ?õ)
  ("~ " ?~)
- ("~_" ? )
  ("/A" ?Å)
  ("/E" ?Æ)
  ("/O" ?Ø)
@@ -978,7 +981,6 @@ For example, the character named `aogonek' is obtained by `/a'."
  ("^r" ?®)
  ("^c" ?©))
 
-
 (quail-define-package
  "latin-prefix" "Latin" "L>" t
  "Latin characters input method with prefix modifiers.
@@ -1181,5 +1183,4 @@ of characters from a single Latin-N charset.
  ("~|" ?¦)
  ("~~" ?¸)
 )
-
 ;;; latin-pre.el ends here