From: mark Date: Thu, 28 Oct 2010 22:57:08 +0000 (+0000) Subject: don't try to backup if backup_scp is empty X-Git-Tag: freeside_2_1_1~1^2~46 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=9d662c980e98fe536214269e7d07fbcc806b17ef;p=freeside.git don't try to backup if backup_scp is empty --- diff --git a/FS/FS/Cron/backup.pm b/FS/FS/Cron/backup.pm index 63f22f737..9d8826120 100644 --- a/FS/FS/Cron/backup.pm +++ b/FS/FS/Cron/backup.pm @@ -12,8 +12,8 @@ use FS::UID qw(driver_name datasrc); sub backup_scp { my $conf = new FS::Conf; my $dest = $conf->config('dump-scpdest'); - $dest .= time2str('/%Y%m%d%H%M%S',time); if ( $dest ) { + $dest .= time2str('/%Y%m%d%H%M%S',time); datasrc =~ /dbname=([\w\.]+)$/ or die "unparsable datasrc ". datasrc; my $database = $1; eval "use Net::SCP qw(scp);";