procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixes: debbugs:11209

Browse source 
* international/characters.el: Recover lost case pairs.
This commit is contained in:
Andreas Schwab 2012-04-09 20:12:40 +02:00
parent 250b840eec
commit 58d1f79757
2 changed files with 25 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2012-04-09 Andreas Schwab <schwab@linux-m68k.org>
* international/characters.el: Recover lost case pairs.
(Bug#11209)
2012-04-09 Chong Yidong <cyd@gnu.org>
* custom.el (custom-variable-p): Return nil for non-symbol

20
lisp/international/characters.el
View file

@ -560,6 +560,7 @@ with L, LRE, or LRO Unicode bidi character type.")
(#x01AC . #x01AD)
(#x01AF . #x01B0)
(#x01B3 . #x01B6)
(#x01B8 . #x01B9)
(#x01BC . #x01BD)
(#x01CD . #x01DC)
(#x01DE . #x01EF)
@ -575,6 +576,7 @@ with L, LRE, or LRO Unicode bidi character type.")
(set-case-syntax-pair from (1+ from) tbl)
(setq from (+ from 2))))))
(set-case-syntax-pair ?Ÿ ?ÿ tbl)
(set-case-syntax-pair #x189 #x256 tbl)
(set-case-syntax-pair #x18A #x257 tbl)
@ -590,6 +592,24 @@ with L, LRE, or LRO Unicode bidi character type.")
;; (set-downcase-syntax ?İ ?i tbl)
;; (set-upcase-syntax ?I ?ı tbl)
(set-case-syntax-pair ?Ɓ ?ɓ tbl)
(set-case-syntax-pair ?Ɔ ?ɔ tbl)
(set-case-syntax-pair ?Ǝ ?ǝ tbl)
(set-case-syntax-pair ?Ə ?ə tbl)
(set-case-syntax-pair ?Ɛ ?ɛ tbl)
(set-case-syntax-pair ?Ɠ ?ɠ tbl)
(set-case-syntax-pair ?Ɣ ?ɣ tbl)
(set-case-syntax-pair ?Ɩ ?ɩ tbl)
(set-case-syntax-pair ?Ɨ ?ɨ tbl)
(set-case-syntax-pair ?Ɯ ?ɯ tbl)
(set-case-syntax-pair ?Ɲ ?ɲ tbl)
(set-case-syntax-pair ?Ɵ ?ɵ tbl)
(set-case-syntax-pair ?Ʀ ?ʀ tbl)
(set-case-syntax-pair ?Ʃ ?ʃ tbl)
(set-case-syntax-pair ?Ʈ ?ʈ tbl)
(set-case-syntax-pair ?Ʊ ?ʊ tbl)
(set-case-syntax-pair ?Ʋ ?ʋ tbl)
(set-case-syntax-pair ?Ʒ ?ʒ tbl)
(set-case-syntax-pair ?DŽ ?dž tbl)
(set-case-syntax-pair ?Dž ?dž tbl)
(set-case-syntax-pair ?LJ ?lj tbl)