From 6815b7a875e95937693864b76a028f92ee2cbf35 Mon Sep 17 00:00:00 2001
From: Michael Andreen <harv@ruin.nu>
Date: Mon, 5 Oct 2009 17:36:03 +0200
Subject: [PATCH] Need to send a real value to execute when the role isn't
 available

---
 Commands/PA.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Commands/PA.pm b/Commands/PA.pm
index 500e93b..9f7ae8a 100644
--- a/Commands/PA.pm
+++ b/Commands/PA.pm
@@ -70,7 +70,7 @@ WITH p AS (SELECT pid,coords(x,y,z),ruler,planet,race,score,size,value,scorerank
 )
 SELECT * FROM p, tags;
 	});
-	$f->execute($x,$y,$z,$nick,$c->uid,$c->check_user_roles(qw/irc_p_intel/));
+	$f->execute($x,$y,$z,$nick,$c->uid,$c->check_user_roles(qw/irc_p_intel/) // 0);
 	if (my $planet = $f->fetchrow_hashref()){
 		for (keys %{$planet}){
 			$planet->{$_} = valuecolor(1,$planet->{$_});
-- 
2.39.2