X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=lib%2FBackupPC%2FSearch%2FEstraier.pm;h=afbaaadfc5a53daa9e2a0d3d1183fb8f9dfbb291;hp=a9f9cae1ea8d6643f6c6109eb0fe5c7724ec1903;hb=d060aa5c2807ff541ac5c83eacfed101ed82c391;hpb=c895c85bd282936cd38d900904bd94734fdc8248 diff --git a/lib/BackupPC/Search/Estraier.pm b/lib/BackupPC/Search/Estraier.pm index a9f9cae..afbaaad 100644 --- 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";