diff options
-rw-r--r-- | bin/smt_fusion | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/smt_fusion b/bin/smt_fusion index 177de4e..9fb9da1 100644 --- a/bin/smt_fusion +++ b/bin/smt_fusion @@ -78,7 +78,9 @@ sub party_fusion { $deathstones, map { _demon($_) } @demons ); - print join("\n", map { _demon($_) } sort { $a cmp $b } keys %$seen), "\n"; + print join("\n", + sort { $a->level <=> $b->level } map { _demon($_) } keys %$seen + ), "\n"; } sub _party_fusion_recursive_fuse { my ($seen, $deathstones, @demons) = @_; |