use WebPAC::Common 0.02;
use WebPAC::Parser 0.08;
use WebPAC::Input 0.16;
-use WebPAC::Store 0.14;
+use WebPAC::Store 0.15;
use WebPAC::Normalize 0.22;
use WebPAC::Output::TT;
use WebPAC::Validate 0.11;
#
# now WebPAC::Store
#
- my $abs_path = abs_path($0);
- $abs_path =~ s#/[^/]*$#/#; #
-
- my $db_path = $config->webpac('db_path');
-
- if ($clean) {
- $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 '$database' in $db_path");
- }
-
- my $store = new WebPAC::Store(
- path => $db_path,
+ my $store = new WebPAC::Store({
debug => $debug,
- );
+ });
#
# prepare output