From 805ab93fefc0102fc7a68c021a7005bc500f141b Mon Sep 17 00:00:00 2001 From: Axel Burri Date: Sat, 18 Jun 2022 15:51:10 +0200 Subject: [PATCH] btrbk: fix function argument Does not trigger a bug in current program logic. Ref: 3ea7746700 btrbk: cosmetics: separate get_btrbk_date function --- btrbk | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/btrbk b/btrbk index d309e66..17671bc 100755 --- a/btrbk +++ b/btrbk @@ -2838,12 +2838,12 @@ sub vinfo_cmd($$@) 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 $NN = $+{NN} // 0; - my $zz = $+{zz}; - my $has_exact_time = defined($+{hh}); # false if timestamp_format=short + my @tm = ( ($a{ss} // 0), ($a{mm} // 0), ($a{hh} // 0), $a{DD}, ($a{MM} - 1), ($a{YYYY} - 1900) ); + my $NN = $a{NN} // 0; + my $zz = $a{zz}; + my $has_exact_time = defined($a{hh}); # false if timestamp_format=short my $time; if(defined($zz)) {