From a6b29a0d67b261c52b79033c1f140502b27cf428 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Mon, 26 May 2014 13:27:53 -0400 Subject: pass options through everywhere --- lib/Games/SMTNocturne/Demons/Fusion.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/Games/SMTNocturne/Demons') diff --git a/lib/Games/SMTNocturne/Demons/Fusion.pm b/lib/Games/SMTNocturne/Demons/Fusion.pm index 045b1c6..9ffe9bb 100644 --- a/lib/Games/SMTNocturne/Demons/Fusion.pm +++ b/lib/Games/SMTNocturne/Demons/Fusion.pm @@ -6,7 +6,7 @@ use overload '""' => 'to_string'; use Games::SMTNocturne::Demons::Demon; sub new { - my ($class, $demon1, $demon2, $options, $sacrifice, $kagatsuchi) = @_; + my ($class, $options, $demon1, $demon2, $sacrifice, $kagatsuchi) = @_; my $attrs = {}; @@ -63,7 +63,7 @@ sub all_demons { sub raw { my $self = shift; - my $array = [ @{ $self->demons } ]; + my $array = [ $self->options, @{ $self->demons } ]; push @$array, $self->sacrifice if $self->sacrifice; push @$array, "" -- cgit v1.2.3-54-g00ecf