X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_tarIncCreate;h=3cad08f772af206c3508ea17ed22dc4bc5f8aa01;hp=e7474662de35a5606fa3496bfd64e05af9715b0c;hb=38abb9a20f4f9562df117185570646049ce126fb;hpb=34ffbfef58638c9db42ea49e784751a0fb0e0365 diff --git a/bin/BackupPC_tarIncCreate b/bin/BackupPC_tarIncCreate index e747466..3cad08f 100755 --- a/bin/BackupPC_tarIncCreate +++ b/bin/BackupPC_tarIncCreate @@ -61,7 +61,7 @@ use strict; no utf8; -use lib "__INSTALLDIR__/lib"; +use lib "/usr/local/BackupPC/lib"; use File::Path; use Getopt::Std; use DBI; @@ -69,7 +69,7 @@ use BackupPC::Lib; use BackupPC::Attrib qw(:all); use BackupPC::FileZIO; use BackupPC::View; -use BackupPC::SearchLib; +use BackupPC::Search; use Time::HiRes qw/time/; use POSIX qw/strftime/; use File::Which; @@ -80,7 +80,7 @@ die("BackupPC::Lib->new failed\n") if ( !(my $bpc = BackupPC::Lib->new) ); my $TopDir = $bpc->TopDir(); my $BinDir = $bpc->BinDir(); my %Conf = $bpc->Conf(); -%BackupPC::SearchLib::Conf = %Conf; +%BackupPC::Search::Conf = %Conf; my %opts; my $in_backup_increment; @@ -198,10 +198,10 @@ my(%HardLinkExtraFiles, @HardLinks); my $max_file_size = $Conf{'MaxArchiveFileSize'} || die "problem with MaxArchiveFileSize parametar"; -my $tar_dir = $Conf{InstallDir}.'/'.$Conf{GzipTempDir}; +my $tar_dir = $Conf{GzipTempDir}; die "problem with $tar_dir, check GzipTempDir in configuration\n" unless (-d $tar_dir && -w $tar_dir); -my $tar_file = BackupPC::SearchLib::getGzipName($Host, $ShareName, $Num) || die "can't getGzipName($Host, $ShareName, $Num)"; +my $tar_file = BackupPC::Search::getGzipName($Host, $ShareName, $Num) || die "can't getGzipName($Host, $ShareName, $Num)"; my $tar_path_final = $tar_dir . '/' . $tar_file; my $tar_path = $tar_path_final . '.tmp';