order by last post

[ndwebbie.git] / resources.pl

diff --git a/resources.pl b/resources.pl
index 363d25e16910d345b96f8dfcd3db98000fcc06ea..fa64c3238a3eb4b9505e295738deb22bb145d6e7 100644 (file)
--- a/resources.pl
+++ b/resources.pl
@@ -19,11 +19,8 @@
 
 use strict;
 use warnings FATAL => 'all';
-no warnings qw(uninitialized);
-use POSIX;
 our $BODY;
 our $DBH;
-our $LOG;
 my $error;
 
 $ND::TEMPLATE->param(TITLE => 'Alliance Resources');
@@ -31,7 +28,7 @@ $ND::TEMPLATE->param(TITLE => 'Alliance Resources');
 die "You don't have access" unless isHC();
 
 my $order = "respplanet DESC";
-if (param('order') =~ /^(score|resources|respplanet|nscore|nscore2|nscore3)$/){
+if (defined param('order') && param('order') =~ /^(size|score|resources|respplanet|nscore|nscore2|nscore3)$/){
        $order = "$1 DESC";
 }