Remove redundant code

Harmless but distracting leftovers from a previous, more complicated, approach.
This commit is contained in:
Juerd Waalboer 2023-12-25 04:47:27 +01:00
parent 3dab71fdbf
commit dd47bfbdf7

View file

@ -37,9 +37,7 @@ sub import {
if ($token eq '-') { if ($token eq '-') {
$posneg = $posneg == -1 ? 1 : -1; $posneg = $posneg == -1 ? 1 : -1;
} elsif ($token eq '+') { } elsif ($token eq '+') {
next if $posneg == -1; # -+
$posneg ||= 1; $posneg ||= 1;
next;
} else { } else {
$posneg or return undef; # two terms in a row $posneg or return undef; # two terms in a row
my $term = RevBank::Amount->parse_string($token) // return undef; my $term = RevBank::Amount->parse_string($token) // return undef;