more fatal warnings and other cleanup

[ndwebbie.git] / launchConfirmation.pl

diff --git a/launchConfirmation.pl b/launchConfirmation.pl
index 1d8caafda450ce178a05d66ba213ad6d2f42a2ce..39a0ff022fffff7a2d72c609a16caae3463d2e6d 100644 (file)
--- a/launchConfirmation.pl
+++ b/launchConfirmation.pl
@@ -18,6 +18,7 @@
 #**************************************************************************/
 
 use strict;
+use warnings FATAL => 'all';
 
 $ND::TEMPLATE->param(TITLE => 'Launch Confirmation');
 
@@ -30,7 +31,7 @@ my $error;
 
 die "You don't have access" unless isMember();
 
-if (param('cmd') eq 'submit'){
+if (defined param('cmd') && param('cmd') eq 'submit'){
        my $missions = param('mission');
        my $findplanet = $DBH->prepare("SELECT planetid(?,?,?,?)");
        my $findattacktarget = $DBH->prepare(q{SELECT c.target,c.wave,c.launched FROM  raid_claims c