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'){
$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"){