diff options
| -rw-r--r-- | lib/Games/SMTNocturne/Demons/FusionChart.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Games/SMTNocturne/Demons/FusionChart.pm b/lib/Games/SMTNocturne/Demons/FusionChart.pm index 7848e40..6d2967c 100644 --- a/lib/Games/SMTNocturne/Demons/FusionChart.pm +++ b/lib/Games/SMTNocturne/Demons/FusionChart.pm @@ -22,7 +22,7 @@ sub unfuse { my @combinations; for my $type1 (keys %TYPES) { - for my $type2 (grep { $_ le $type1 } keys %TYPES) { + for my $type2 (grep { $_ ge $type1 } keys %TYPES) { push @combinations, [ $type1, $type2 ] if $TYPES{$type1}{$type2} eq $type; } |