Use actual back in backup dest variables

virtualmin · Apr 16, 2021 · c46f148 · c46f148
1 parent 8c028f1
commit c46f148
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/backups-lib.pl b/backups-lib.pl
@@ -5866,6 +5866,14 @@ sub set_backup_envs
 foreach my $k (keys %$sched) {
 	$ENV{'BACKUP_'.uc($k)} = $sched->{$k};
 	}
+if ($sched->{'strftime'}) {
+	# Expand out date-based paths
+	foreach my $k (keys %$sched) {
+		if ($k eq 'dest' || $k =~ /^dest\d+$/) {
+			$ENV{'BACKUP_'.uc($k)} = &backup_strftime($sched->{$k});
+			}
+		}
+	}
 $ENV{'BACKUP_DOMAIN_NAMES'} = join(" ", map { $_->{'dom'} } @$doms);
 $ENV{'BACKUP_STATUS'} = $status if (defined($status));
 }