summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2014-05-26 02:15:07 -0400
committerJesse Luehrs <doy@tozt.net>2014-05-26 02:15:07 -0400
commit54d6cc42ef6f8180d6237e593526f4900b14a995 (patch)
tree2004787c24632a4bfd0dabc5b326a5594f511cf1
parentfad35a892eca5bff5824f6bd4ddf889b2aae7f8d (diff)
downloadgames-smtnocturne-demons-54d6cc42ef6f8180d6237e593526f4900b14a995.tar.gz
games-smtnocturne-demons-54d6cc42ef6f8180d6237e593526f4900b14a995.zip
rename the option to max_level
this way it doesn't conflict with the 'level' parameter to from_fusion_stats
-rw-r--r--lib/Games/SMTNocturne/Demons.pm13
1 files changed, 7 insertions, 6 deletions
diff --git a/lib/Games/SMTNocturne/Demons.pm b/lib/Games/SMTNocturne/Demons.pm
index 7d95808..c4b5703 100644
--- a/lib/Games/SMTNocturne/Demons.pm
+++ b/lib/Games/SMTNocturne/Demons.pm
@@ -78,11 +78,11 @@ sub fusions_for {
for my $types (Games::SMTNocturne::Demons::FusionChart::unfuse($demon->type)) {
my ($type1, $type2) = @$types;
for my $demon1 (Games::SMTNocturne::Demons::Demon->from_type($type1)) {
- next if defined $options->{level}
- && $options->{level} < $demon1->level;
+ next if defined $options->{max_level}
+ && $options->{max_level} < $demon1->level;
for my $demon2 (Games::SMTNocturne::Demons::Demon->from_type($type2)) {
- next if defined $options->{level}
- && $options->{level} < $demon2->level;
+ next if defined $options->{max_level}
+ && $options->{max_level} < $demon2->level;
push @fusions, [ $demon1, $demon2 ]
if (fuse($demon1, $demon2) || '') eq $demon;
}
@@ -110,8 +110,9 @@ sub fusions_for {
];
}
$special->{$key} = [
- grep { $_->level <= $options->{level} } @{ $special->{$key} }
- ] if defined $options->{level};
+ grep { $_->level <= $options->{max_level} }
+ @{ $special->{$key} }
+ ] if defined $options->{max_level};
}
if ($special->{demon3}) {