X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_ASA_ArchiveStart;h=c446363df2e9d5ca69fe76d91c87e19f850a79fd;hp=14209c4811db3f36b2aebd2e72285987b76d5a98;hb=7cc35df2d8753d1eddd17d3f377fffd6ef316c1d;hpb=57de3260097dac7c17b9614aba517ac895014d9a

diff --git a/bin/BackupPC_ASA_ArchiveStart b/bin/BackupPC_ASA_ArchiveStart
index 14209c4..c446363 100755
--- a/bin/BackupPC_ASA_ArchiveStart
+++ b/bin/BackupPC_ASA_ArchiveStart
@@ -111,7 +111,8 @@ foreach ( @HostFilter ) {
     $sth->execute( $host );
     if ( $sth->rows == 0 ) {
 	warn "no backups to archive on $host\n";
-	next;
+	push @HostList, $host;
+	push @BackupList, 0; # fake, but will make full-text update
     }
 
     while ( my $row = $sth->fetchrow_hashref ) {
@@ -121,6 +122,8 @@ foreach ( @HostFilter ) {
     }
 }
 
+$dbh->disconnect;
+
 my $ReqFileName;
 for ( my $i = 0 ; ; $i++ ) {
     $ReqFileName="archiveReq.$$.$i";
@@ -135,7 +138,7 @@ my %ArchiveReq = (
     compext     => $bpc->{Conf}{ArchiveComp} eq 'none' ? ''
                     : ($bpc->{Conf}{ArchiveComp} eq 'gzip' ? '.gz' : '.bz2'),
     parfile     => $bpc->{Conf}{ArchivePar},
-    splitsize   => '0000000',
+    splitsize   => $bpc->{Conf}{ArchiveSplit},
     host        => $ArchiveHost,
     HostList    => \@HostList,
     BackupList  => \@BackupList,