diff options
| author | Jesse Luehrs <doy@tozt.net> | 2014-05-26 10:33:04 -0400 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2014-05-26 10:33:04 -0400 |
| commit | e27bf43679a0b49a060ed8084f1f09722fdc08a3 (patch) | |
| tree | db22c342f3731f791506fe53b1f0b87e28d2d502 /lib/Games/SMTNocturne/Demons.pm | |
| parent | 97b7df9631adf914eaf11212768a1ce32cb12b16 (diff) | |
| download | games-smtnocturne-demons-e27bf43679a0b49a060ed8084f1f09722fdc08a3.tar.gz games-smtnocturne-demons-e27bf43679a0b49a060ed8084f1f09722fdc08a3.zip | |
no reason to split up kagatsuchi phases like this
Diffstat (limited to 'lib/Games/SMTNocturne/Demons.pm')
| -rw-r--r-- | lib/Games/SMTNocturne/Demons.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lib/Games/SMTNocturne/Demons.pm b/lib/Games/SMTNocturne/Demons.pm index b09672b..30909ee 100644 --- a/lib/Games/SMTNocturne/Demons.pm +++ b/lib/Games/SMTNocturne/Demons.pm @@ -175,10 +175,7 @@ sub fusions_for { } if ($special->{kagatsuchi}) { - @special_fusions = map { - my $phase = $_; - map { [ @$_, $phase ] } @special_fusions - } @{ $special->{kagatsuchi} }; + push @$_, $special->{kagatsuchi} for @special_fusions; } } |