Cancel previous change. for

I-WITH-DOT-ABOVE and DOTLESS-i

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e919f5f4622d8c1d8367c718cba3fc53e8485ca8..032d796014a177a47dd3e2ee12195d3946e1d513 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2005-02-03  Kenichi Handa  <handa@m17n.org>
+
+       * international/characters.el: Cancel previous change. for
+       I-WITH-DOT-ABOVE and DOTLESS-i.
+
+       * international/latin-5.el: Cancel previous change.
+
 2005-02-02  Nick Roberts  <nickrob@snap.net.nz>
 
        * progmodes/gud.el: Correction to syntax in gud-menu-map.

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index 77eb49807c01ed659a1c74a42ed698b4fde5e0dd..727c9e6b9ff676b75bb4e4ae5a9f74158d690f49 100644 (file)
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -884,8 +884,8 @@
         (set-case-syntax-pair
          (decode-char 'ucs (1- c)) (decode-char 'ucs c) tbl))
     (setq c (1+ c)))
-  (set-downcase-syntax  ?\e$,1 P\e(B ?i tbl)
-  (set-upcase-syntax    ?I ?\e$,1 Q\e(B tbl)
+  ;;(set-downcase-syntax  ?\e$,1 P\e(B ?i tbl)
+  ;;(set-upcase-syntax    ?I ?\e$,1 Q\e(B tbl)
   (set-case-syntax-pair ?\e$,1 R\e(B ?\e$,1 S\e(B tbl)
   (set-case-syntax-pair ?\e$,1 T\e(B ?\e$,1 U\e(B tbl)
   (set-case-syntax-pair ?\e$,1 V\e(B ?\e$,1 W\e(B tbl)