X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=lib%2FBackupPC%2FSearch.pm;h=479b51d70546c13f5eba2781b45c02f68ed2b7a4;hp=b1b8bea1e57a035157ebd9dfc52f966752b7f19a;hb=aff621b091597104904eafcb4ad6d9fabc2bf7bb;hpb=6e361dfbcfd712fd68d507a90cf3a0b5f7a089cd diff --git a/lib/BackupPC/Search.pm b/lib/BackupPC/Search.pm index b1b8bea..479b51d 100644 --- a/lib/BackupPC/Search.pm +++ b/lib/BackupPC/Search.pm @@ -15,13 +15,13 @@ use Data::Dump qw(dump); my $on_page = 100; my $pager_pages = 10; -my $dsn = $Conf{SearchDSN}; -my $db_user = $Conf{SearchUser} || ''; +my $dbh; -sub search_module { +my $bpc = BackupPC::Lib->new || die; +$bpc->ConfigRead('_search_archive'); +my %Conf = $bpc->Conf(); - my $bpc = BackupPC::Lib->new || die; - my %Conf = $bpc->Conf(); +sub search_module { my $search_module = $Conf{SearchModule} || die "search is disabled"; eval "use $search_module"; @@ -37,7 +37,7 @@ sub search_module { my $dbh; sub get_dbh { - $dbh ||= DBI->connect($dsn, $db_user, "", { RaiseError => 1, AutoCommit => 1 } ); + $dbh ||= DBI->connect($Conf{SearchDSN}, $Conf{SearchUser}, "", { RaiseError => 1, AutoCommit => 1 } ); return $dbh; }