From f211f8721574d525640b3b1abe99ab7453b3b04a Mon Sep 17 00:00:00 2001
From: Michael Andreen <harv@ruin.nu>
Date: Fri, 29 Dec 2006 16:54:35 +0000
Subject: [PATCH] more fatal warnings

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

diff --git a/points.pl b/points.pl
index 95845fa..213fad9 100644
--- a/points.pl
+++ b/points.pl
@@ -19,7 +19,6 @@
 
 use strict;
 use warnings FATAL => 'all';
-no warnings qw(uninitialized);
 
 $ND::TEMPLATE->param(TITLE => 'Top Members');
 
@@ -30,7 +29,7 @@ our $LOG;
 die "You don't have access" unless isMember();
 
 my $type = "total";
-if (param('type') =~ /^(defense|attack|total|humor|scan|rank)$/){
+if (defined param('type') && param('type') =~ /^(defense|attack|total|humor|scan|rank)$/){
 	$type = $1;
 }
 $type .= '_points' unless ($type eq 'rank');
-- 
2.39.2