move loading of search module into BackupPC::Search

[BackupPC.git] / lib / BackupPC / Search / Estraier.pm

diff --git a/lib/BackupPC/Search/Estraier.pm b/lib/BackupPC/Search/Estraier.pm
index a9f9cae..afbaaad 100644 (file)
--- a/lib/BackupPC/Search/Estraier.pm
+++ b/lib/BackupPC/Search/Estraier.pm
@@ -3,11 +3,15 @@ use warnings;
 use strict;
 
 use Search::Estraier 0.04;
+use Data::Dump qw(dump);
 
 my $debug = $ENV{DEBUG} || 0;
 
 sub new {
-       my ( $class, $index_node_url ) = @_;
+       my $class = shift @_;
+       my %Conf = @_;
+
+       my $index_node_url = $Conf{HyperEstraierIndex} || die "no HyperEstraierIndex in config ",dump(%Conf);
 
        warn "# using $index_node_url";