use DBI;
use BackupPC::Lib;
-use BackupPC::SearchLib;
+use BackupPC::Search;
use Time::HiRes qw/time/;
use POSIX qw/strftime/;
use Term::Menus;
# don't check for user
my $bpc = BackupPC::Lib->new(undef, undef, 1) || die;
my %Conf = $bpc->Conf();
-%BackupPC::SearchLib::Conf = %Conf;
+%BackupPC::Search::Conf = %Conf;
my $conf_bin;
# this part
my $p = {
- filename => BackupPC::SearchLib::getGzipName($row->{'host'}, $row->{'share'}, $row->{'num'}),
+ filename => BackupPC::Search::getGzipName($row->{'host'}, $row->{'share'}, $row->{'num'}),
host => $row->{'host'},
share => $row->{'share'},
num => $row->{'num'}
}
-#my $tar_file = BackupPC::SearchLib::getGzipName($row->{'host'}, $row->{'share'}, $row->{'num'});
+#my $tar_file = BackupPC::Search::getGzipName($row->{'host'}, $row->{'share'}, $row->{'num'});
#print curr_time, sprintf(" %s:%s %-3d ", $row->{'host'}, $row->{'share'}, $row->{'num'}), " -> $tar_file ";
print "Recoding finished, exiting...\n";