From: Michael Andreen <harv@ruin.nu>
Date: Thu, 3 Sep 2009 08:19:54 +0000 (+0200)
Subject: Hide warning about uninitialized value
X-Git-Url: https://ruin.nu/git/?p=ndwebbie.git;a=commitdiff_plain;h=635963fffb6fb1a05e7fcf2812f9df1b006be7fd

Hide warning about uninitialized value
---

diff --git a/lib/NDWeb/Controller/Members.pm b/lib/NDWeb/Controller/Members.pm
index 81a1238..b9ae443 100644
--- a/lib/NDWeb/Controller/Members.pm
+++ b/lib/NDWeb/Controller/Members.pm
@@ -279,6 +279,7 @@ sub points : Local {
 	my ( $self, $c, $order ) = @_;
 	my $dbh = $c->model;
 
+	$order //= 'total_points';
 	if ($order ~~ /^((?:defense|attack|total|humor|scan|raid)_points)$/
 			|| $order ~~ /^(defprio)$/){
 		$order = "$1 DESC";
@@ -307,6 +308,7 @@ sub stats : Local {
 	my ( $self, $c, $order ) = @_;
 	my $dbh = $c->model;
 
+	$order //= 'score';
 	if ($order ~~ /^(scre|value|xp|size|race)$/){
 		$order = "$1rank";
 	}else{