use WebPAC::Store 0.03;
use WebPAC::Normalize::XML;
use WebPAC::Output::TT;
-use WebPAC::Output::Estraier 0.08;
+use WebPAC::Output::Estraier '0.10';
use YAML qw/LoadFile/;
use Getopt::Long;
use File::Path;
my $est_config = $config->{hyperestraier} || $log->logdie("can't find 'hyperestraier' part in confguration");
$est_config->{database} = $database;
$est_config->{clean} = $clean;
+ $est_config->{label} = $db_config->{name};
my $est = new WebPAC::Output::Estraier( %{ $est_config } );
$log->info("creating new database $database in $db_path");
rmtree( $db_path ) || $log->warn("can't remove $db_path: $!");
} else {
- $log->info("working on $database in $db_path");
+ $log->debug("working on $database in $db_path");
}
my $db = new WebPAC::Store(
my $input_module = $config->{webpac}->{inputs}->{$type};
- $log->info("working on input $input->{path} [$input->{type}] using $input_module");
+ $log->info("working on input '$input->{path}' [$input->{type}] using $input_module lookup '$input->{lookup}'");
my $input_db = new WebPAC::Input(
module => $input_module,
limit => $limit || $input->{limit},
offset => $offset,
lookup => $lookup,
+ recode => $input->{recode},
);
$log->logdie("can't create input using $input_module") unless ($input);