From c1ab872978f1d465bbe4aa99143363b438867f78 Mon Sep 17 00:00:00 2001 From: imiyazaki Date: Tue, 28 Oct 2003 13:42:45 +0000 Subject: [PATCH] enable &de_er() to work. --- Chise_utils/scripts/sample.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/Chise_utils/scripts/sample.pl b/Chise_utils/scripts/sample.pl index 5548e96..a287ab2 100644 --- a/Chise_utils/scripts/sample.pl +++ b/Chise_utils/scripts/sample.pl @@ -52,6 +52,7 @@ if($opt_help exit 1; }else{ $char=shift or $char=""; + $char=&de_er($char); } if($opt_mapfrom){ @@ -81,7 +82,6 @@ if($opt_map){ print STDERR "No map for $opt_rev_map.\n"; } }elsif($opt_allatr){ - $char=&de_er($char) if($char=~/\d/); print $char,"\n"; foreach $atr (sort keys %db){ if($value=&get_char_attribute($char,$atr)){ @@ -89,7 +89,6 @@ if($opt_map){ } } }elsif($opt_atr){ - $char=&de_er($char) if($char=~/\d/); print $char,"\n"; print " ",$opt_atr,":",&get_char_attribute($char,$opt_atr),"\n"; }elsif($opt_showatr){ -- 1.7.10.4