bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix bug: would eat its own queued entry, resulting in no-op

Browse source 
It would work for the first item because the size >= 2 guard prevented the rest
of the sub from running.
This commit is contained in:
Juerd Waalboer 2019-11-05 05:42:54 +01:00
parent 0354b3d740
commit f1389c8c5c
1 changed files with 5 additions and 1 deletions

6
plugins/repeat
View file

@ -74,9 +74,13 @@ sub hook_added_entry {
my @entries = $cart->entries;
my @planned = $cart->entries('_repeat');
return ABORT, "Multiple repeats queued; I'm confused." if @planned > 1;
return if not @planned;
return ABORT, "Multiple repeats queued; I'm confused." if @planned > 1;
return ABORT, $err_pfand if $cart->entries('is_pfand');
return if $planned[0] == $entries[-1];
return ABORT, "Queued repeat is not the penultimate item; I'm confused"
if $entries[-2] != $planned[0];
my $num = $planned[0]->quantity;