diff options
author | Jesse Luehrs <doy@tozt.net> | 2014-06-16 22:31:56 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2014-06-16 22:33:32 -0400 |
commit | 421bc2088f8309b85441128658dc25ebbc76e0b3 (patch) | |
tree | f5fb566c6671caa55c261780ebb04c2eaad38a5e /bin/smt | |
parent | d7bd5eb79c560ea3f26370c14f98024ca95b4885 (diff) | |
download | games-smtnocturne-demons-421bc2088f8309b85441128658dc25ebbc76e0b3.tar.gz games-smtnocturne-demons-421bc2088f8309b85441128658dc25ebbc76e0b3.zip |
spell this properly
Diffstat (limited to 'bin/smt')
-rwxr-xr-x | bin/smt | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -14,11 +14,11 @@ sub _fusions_for { Games::SMTNocturne::Demons::fusions_for(@_) } my $command = shift @ARGV; -my ($max_level, $deathstones, $kagatsuchi, $bosses); +my ($max_level, $deathstones, $kagutsuchi, $bosses); GetOptions( "max_level=i" => \$max_level, "deathstones=i" => \$deathstones, - "kagatsuchi=i" => \$kagatsuchi, + "kagutsuchi=i" => \$kagutsuchi, "boss=s@" => \$bosses, ) or die "couldn't parse options"; $bosses = [ split(/,/, join(',', @$bosses)) ] @@ -27,7 +27,7 @@ $bosses = [ split(/,/, join(',', @$bosses)) ] my $options = { max_level => $max_level, deathstone => $deathstones, - kagatsuchi => $kagatsuchi, + kagutsuchi => $kagutsuchi, bosses => $bosses, }; @@ -148,7 +148,7 @@ sub _check_fusion { %$options, sacrifice => $sacrifice, deathstone => $deathstones, - kagatsuchi => $phase, + kagutsuchi => $phase, }, ); return unless $fused; |