From b0e3aa47a0161d8ba937ec39838c9d1d71bf0f1f Mon Sep 17 00:00:00 2001
From: imiyazaki <imiyazaki>
Date: Wed, 26 Mar 2003 05:04:09 +0000
Subject: [PATCH] remove case ignoring of entity reference.

---
 Chise_utils/Chise_utils.pm |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Chise_utils/Chise_utils.pm b/Chise_utils/Chise_utils.pm
index b0d7608..0cdd999 100644
--- a/Chise_utils/Chise_utils.pm
+++ b/Chise_utils/Chise_utils.pm
@@ -226,7 +226,7 @@ sub de_er{
 	$output_char=pack("U",$er);
     }elsif($er=~/^U[\+\-]([a-fA-F\d]+)/){
 	$output_char=pack("U",hex($1));
-    }elsif($er=~/(?:I\-)?($keys)\-?([0-9a-f]+)/i){
+    }elsif($er=~/(?:I\-)?($keys)\-?([0-9a-fA-F]+)/){
 	($atr,$value)=($1,$2);
 	unless($er_alias{$atr}=~/daikanwa|gt/){
 	    $value=hex($value);
-- 
1.7.10.4