[Emacs-diffs] /srv/bzr/emacs/trunk r105610: * leim/quail/latin-ltx.el: Complete the super and subscript letters.

[Stefan Monnier]

------------------------------------------------------------
revno: 105610
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Mon 2011-08-29 14:48:01 -0400
message:
  * leim/quail/latin-ltx.el: Complete the super and subscript letters.
modified:
  leim/ChangeLog
  leim/quail/latin-ltx.el

=== modified file 'leim/ChangeLog'
--- a/leim/ChangeLog    2011-08-20 22:19:53 +0000
+++ b/leim/ChangeLog    2011-08-29 18:48:01 +0000
@@ -1,3 +1,7 @@
+2011-08-29  Stefan Monnier  <address@hidden>
+
+       * quail/latin-ltx.el: Complete the super and subscript letters.
+
 2011-08-20  Glenn Morris  <address@hidden>
 
        * Makefile.in (OTHERS):

=== modified file 'leim/quail/latin-ltx.el'
--- a/leim/quail/latin-ltx.el   2011-05-05 04:00:38 +0000
+++ b/leim/quail/latin-ltx.el   2011-08-29 18:48:01 +0000
@@ -351,16 +351,65 @@
  ("^9" ?⁹)
  ("^=" ?⁼)
  ("^\\gamma" ?ˠ)
+ ;; FIXME: It'd be nicer to generate some of these rules via something like
+ ;; (map (lambda (name char)
+ ;;        (cond ((string-match "MODIFIER SMALL LETTER \\(.\\)" name)
+ ;;               (list (string ?^ (downcase (aref name (match-beginning 1))))
+ ;;                     char)))
+ ;;              ...)))
+ ("^a" ?ᵃ)
+ ("^b" ?ᵇ)
+ ("^c" ?ᶜ)
+ ("^d" ?ᵈ)
+ ("^e" ?ᵉ)
+ ("^f" ?ᶠ)
+ ("^g" ?ᵍ)
  ("^h" ?ʰ)
+ ;; ("^i" ?)  ;; FIXME: can't find MODIFIER SMALL LETTER I  !?!
  ("^j" ?ʲ)
+ ("^k" ?ᵏ)
  ("^l" ?ˡ)
+ ("^m" ?ᵐ)
  ("^n" ?ⁿ)
- ("^o" ?º)
+ ("^o" ?ᵒ)
+ ("^o_" ?º)
+ ("^p" ?ᵖ)
+ ;; ("^q" ?)  ;; FIXME: can't find MODIFIER SMALL LETTER Q  !?!
  ("^r" ?ʳ)
  ("^s" ?ˢ)
+ ("^t" ?ᵗ)
+ ("^u" ?ᵘ)
+ ("^v" ?ᵛ)
  ("^w" ?ʷ)
  ("^x" ?ˣ)
  ("^y" ?ʸ)
+ ("^z" ?ᶻ)
+ ("^A" ?ᴬ)
+ ("^B" ?ᴮ)
+ ;; ("^C" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER C  !?!
+ ("^D" ?ᴰ)
+ ("^E" ?ᴱ)
+ ;; ("^F" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER F  !?!
+ ("^G" ?ᴳ)
+ ("^H" ?ᴴ)
+ ("^I" ?ᴵ)
+ ("^J" ?ᴶ)
+ ("^K" ?ᴷ)
+ ("^L" ?ᴸ)
+ ("^M" ?ᴹ)
+ ("^N" ?ᴺ)
+ ("^O" ?ᴼ)
+ ("^P" ?ᴾ)
+ ;; ("^Q" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER Q  !?!
+ ("^R" ?ᴿ)
+ ;; ("^S" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER S  !?!
+ ("^T" ?ᵀ)
+ ("^U" ?ᵁ)
+ ("^V" ?ⱽ)
+ ("^W" ?ᵂ)
+ ;; ("^X" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER X  !?!
+ ;; ("^Y" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER Y  !?!
+ ;; ("^Z" ?)  ;; FIXME: can't find MODIFIER CAPITAL LETTER Z  !?!
  ("^{SM}" ?℠)
  ("^{TEL}" ?℡)
  ("^{TM}" ?™)