From 0d93216c1caf25f1663d82d7e3f7d81cc9b61ea2 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Tue, 10 Apr 2012 13:52:51 +0300 Subject: [PATCH] Copy changes from trunk 2012-04-09T18:12:40Z!schwab@linux-m68k.org to fix letter-case pairs. lisp/international/characters.el: Recover lost case pairs. --- lisp/ChangeLog | 4 ++++ lisp/international/characters.el | 18 ++++++++++++++++++ 2 files changed, 22 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 085f8f0bc0d..3a3a3f51a6f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-04-10 Andreas Schwab + + * international/characters.el: Recover lost case pairs. + 2012-04-10 Glenn Morris * files.el (dir-locals-set-class-variables): Doc fix. diff --git a/lisp/international/characters.el b/lisp/international/characters.el index ff6ac7b108a..b7cc700cbff 100644 --- a/lisp/international/characters.el +++ b/lisp/international/characters.el @@ -591,6 +591,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) -- 2.11.4.GIT