btrbk: fix function argument

Does not trigger a bug in current program logic.

Ref: 3ea7746700 btrbk: cosmetics: separate get_btrbk_date function
disable-ssh-password-prompt
Axel Burri 2022-06-18 15:51:10 +02:00
parent 43a125d4e1
commit 805ab93fef
1 changed files with 5 additions and 5 deletions

10
btrbk
View File

@ -2838,12 +2838,12 @@ sub vinfo_cmd($$@)
sub _get_btrbk_date(@) sub _get_btrbk_date(@)
{ {
my %bts = @_; # named capture buffers (%+) from $btrbk_timestamp_match my %a = @_; # named capture buffers (%+) from $btrbk_timestamp_match
my @tm = ( ($+{ss} // 0), ($+{mm} // 0), ($+{hh} // 0), $+{DD}, ($+{MM} - 1), ($+{YYYY} - 1900) ); my @tm = ( ($a{ss} // 0), ($a{mm} // 0), ($a{hh} // 0), $a{DD}, ($a{MM} - 1), ($a{YYYY} - 1900) );
my $NN = $+{NN} // 0; my $NN = $a{NN} // 0;
my $zz = $+{zz}; my $zz = $a{zz};
my $has_exact_time = defined($+{hh}); # false if timestamp_format=short my $has_exact_time = defined($a{hh}); # false if timestamp_format=short
my $time; my $time;
if(defined($zz)) { if(defined($zz)) {