From: Kenichi Handa <handa@m17n.org>
Date: Wed, 2 Feb 2005 01:12:36 +0000 (+0000)
Subject: (tbl): Setup cases of I-WITH-DOT-ABOVE, DOTLESS-i.
X-Git-Tag: ttn-vms-21-2-B4~2474
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=62b00758164753249cacc65755a09ef6d3d05ed8;p=emacs.git

(tbl): Setup cases of I-WITH-DOT-ABOVE, DOTLESS-i.
---

diff --git a/lisp/international/latin-5.el b/lisp/international/latin-5.el
index 5d96c1132a7..5d6cf04dc50 100644
--- a/lisp/international/latin-5.el
+++ b/lisp/international/latin-5.el
@@ -96,14 +96,14 @@
   (set-case-syntax-pair 218 250 tbl)	;latin letter u with acute
   (set-case-syntax-pair 219 251 tbl)	;latin letter u with circumflex
   (set-case-syntax-pair 220 252 tbl)	;latin letter u with diaeresis
-  (set-case-syntax 221 "w" tbl)		;latin capital letter i with dot above
+  (set-downcase-syntax  221 ?i  tbl)	;latin capital letter i with dot above
   (set-case-syntax-pair 222 254 tbl)	;latin letter s with cedilla
   (set-case-syntax 223 "w" tbl)		;latin small letter sharp s
   (set-case-syntax 234 "w" tbl)		;latin small letter e with ogonek
   (set-case-syntax 236 "w" tbl)		;latin small letter e with dot above
   (set-case-syntax 239 "w" tbl)		;latin small letter i with macron
   (set-case-syntax 247 "_" tbl)		;division sign
-  (set-case-syntax 253 "w" tbl)		;latin small letter i dotless
+  (set-upcase-syntax ?I 253 tbl)	;latin small letter i dotless
   (set-case-syntax 255 "w" tbl))	;latin small letter y with diaeresis
 
 ;; When preloading this file, don't provide the feature.