From: imiyazaki Date: Tue, 28 Oct 2003 13:42:05 +0000 (+0000) Subject: correct new CHISE DB structure. X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=11d6baa6feb26eccc647b9f33e67ba4ab9801673;p=chise%2Fperl.git correct new CHISE DB structure. --- diff --git a/Chise_utils/Chise_utils.pm b/Chise_utils/Chise_utils.pm index 2e13949..53b0713 100644 --- a/Chise_utils/Chise_utils.pm +++ b/Chise_utils/Chise_utils.pm @@ -47,12 +47,10 @@ our $VERSION = '0.01'; my $DB_HOME=""; unless($DB_HOME){ - if(-e '/usr/local/lib/chise/db'){ - $DB_HOME='/usr/local/lib/chise/db'; - }elsif(-e '/usr/lib/chise/db'){ - $DB_HOME='/usr/lib/chise/db'; - }elsif(-e '/sw/lib/chise/db'){ - $DB_HOME='/sw/lib/chise/db'; + if(-e '/usr/local/lib/chise/chise-db'){ + $DB_HOME='/usr/local/lib/chise/chise-db'; + }elsif(-e '/usr/lib/chise/chise-db'){ + $DB_HOME='/usr/lib/chise/chise-db'; }elsif(-e '/usr/local/lib/chise/char-db'){ $DB_HOME='/usr/local/lib/chise/char-db'; }elsif(-e 'd:/work/chise/char-db'){ @@ -109,10 +107,10 @@ if(-d "$DB_HOME/character"){ $atr=~s!$DB_HOME/character/feature/!!; $db{$atr}=$_; } - for (glob "$DB_HOME/character/by-feature/*"){ + for (glob "$DB_HOME/character/by_feature/*"){ next if(/\.txt$/); $atr=$_; - $atr=~s!$DB_HOME/character/feature/!!; + $atr=~s!$DB_HOME/character/by_feature/!!; $reverse_db{$atr}=$_; } }elsif(-d "$DB_HOME/system-char-id"){