X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_archiveStart;h=8f39e06970742800bf8108dcacf4bcb43ac1d865;hp=c7c925551bd6fcf8c501c951e752022a4dd06561;hb=refs%2Ftags%2Fv3_2_0;hpb=fda25dc88a63ccac1c80efa2e4994bf0725ca9b7 diff --git a/bin/BackupPC_archiveStart b/bin/BackupPC_archiveStart index c7c9255..8f39e06 100755 --- a/bin/BackupPC_archiveStart +++ b/bin/BackupPC_archiveStart @@ -1,4 +1,4 @@ -#!/bin/perl +#!/usr/bin/perl #============================================================= -*-perl-*- # # BackupPC_archiveStart: start an archive request from the @@ -17,7 +17,7 @@ # Craig Barratt # # COPYRIGHT -# Copyright (C) 2007 Craig Barratt +# Copyright (C) 2007-2009 Craig Barratt # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -35,7 +35,7 @@ # #======================================================================== # -# Version 3.1.0, released 25 Nov 2007. +# Version 3.2.0, released 31 Jul 2010. # # See http://backuppc.sourceforge.net. # @@ -94,8 +94,11 @@ for ( my $i = 0 ; ; $i++ ) { my %ArchiveReq = ( archiveloc => $bpc->{Conf}{ArchiveDest}, archtype => 0, - compression => $bpc->{Conf}{CatPath}, - compext => '.raw', + compression => $bpc->{Conf}{ArchiveComp} eq 'none' ? $bpc->{Conf}{CatPath} + : ($bpc->{Conf}{ArchiveComp} eq 'gzip' + ? $bpc->{Conf}{GzipPath} : $bpc->{Conf}{Bzip2Path}), + compext => $bpc->{Conf}{ArchiveComp} eq 'none' ? '' + : ($bpc->{Conf}{ArchiveComp} eq 'gzip' ? '.gz' : '.bz2'), parfile => $bpc->{Conf}{ArchivePar}, splitsize => '0000000', host => $ArchiveHost,