From bc72241a845cd61a6386ec1394ca9d49c3fae3de Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 27 Jan 2011 22:48:21 +0100
Subject: [PATCH 1/1] added TarCreateIncremental config variable forced in
 archive host

---
 bin/BackupPC_tarCreate | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/bin/BackupPC_tarCreate b/bin/BackupPC_tarCreate
index feec8b6..b04464a 100755
--- a/bin/BackupPC_tarCreate
+++ b/bin/BackupPC_tarCreate
@@ -141,8 +141,17 @@ if ( $opts{s} =~ m{(^|/)\.\.(/|$)} ) {
     exit(1);
 }
 
+# XXX ASA Search extension
+my $view_opts;
+
+my %Conf = $bpc->Conf;
+if ( $Conf{TarCreateIncremental} || $opts{i} ) {
+	warn "# incremental dump";
+	$view_opts = { only_first => 1 };
+}
+
 our $ShareName = $opts{s};
-our $view = BackupPC::View->new($bpc, $Host, \@Backups, $opts{i} ? { only_first => 1 } : {});
+our $view = BackupPC::View->new($bpc, $Host, \@Backups, $view_opts);
 
 #
 # This constant and the line of code below that uses it are borrowed
-- 
2.20.1