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

Don't die when addon doesn't exist

Browse source
This commit is contained in:
Juerd Waalboer 2024-12-26 05:26:28 +01:00
parent 19cf432905
commit 02c9db1ddf
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/RevBank/Products.pm
View file

@ -133,11 +133,12 @@ sub read_products($filename = "revbank.products", $default_contra = "+sales/prod
next PRODUCT; next PRODUCT;
} }
my $addon = { %{ $products{$addon_id} } }; # shallow copy to overwrite ->{price} later my $addon = $products{$addon_id};
if (not $addon) { if (not $addon) {
warn "Addon '$addon_id' does not exist for '$product->{id}' at $filename line $product->{line}.\n"; warn "Addon '$addon_id' does not exist for '$product->{id}' at $filename line $product->{line}.\n";
next PRODUCT; next PRODUCT;
} }
$addon = { %$addon }; # shallow copy to overwrite ->{price} later
push @{ $product->{addons} }, $addon; push @{ $product->{addons} }, $addon;
push @addon_ids, @{ $addon->{_addon_ids} }; push @addon_ids, @{ $addon->{_addon_ids} };