From 952041913be63dc431895775389ed78f9e156d76 Mon Sep 17 00:00:00 2001
From: Michael Andreen <harv@ruin.nu>
Date: Fri, 29 Dec 2006 17:08:31 +0000
Subject: [PATCH 1/1] more fatal warnings

---
 defrequest.pl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/defrequest.pl b/defrequest.pl
index eb90f65..a80f62c 100644
--- a/defrequest.pl
+++ b/defrequest.pl
@@ -19,7 +19,6 @@
 
 use strict;
 use warnings FATAL => 'all';
-no warnings qw(uninitialized);
 
 $ND::TEMPLATE->param(TITLE => 'Request Defense');
 
@@ -30,7 +29,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 $insert = $DBH->prepare('INSERT INTO defense_requests (uid,message) VALUES (?,?)');
 	if($insert->execute($ND::UID,param('message'))){
 		$BODY->param(Reply => param('message'));
-- 
2.39.2