X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/424c0dbea2a9dbe423c269bc7619546688fbd6f4..e7665dd54b42205d091a5f530f82c523bf30070f:/sc.plp diff --git a/sc.plp b/sc.plp index e426a6e..5911275 100644 --- a/sc.plp +++ b/sc.plp @@ -73,6 +73,14 @@ for my $unit (@{$units}) { addupgrade(\$unit->{upgraded}->{$col}, $increase, $unit->{$col}); } } + for my $special (@{ $unit->{special} }) { + for my $upgrade (@{ $special->{upgrade} }) { + while (my ($col, $increase) = each %{$upgrade}) { + defined $special->{$col} or next; + addupgrade(\$special->{upgraded}->{$col}, $increase, $special->{$col}); + } + } + } } sub coltoggle {