From ba1186cc4ce22ed1460c20422dcc9594d07e84d6 Mon Sep 17 00:00:00 2001 From: Michael Andreen Date: Mon, 2 Jul 2007 16:29:36 +0000 Subject: [PATCH] don't accept padding of whitespaces, and properly add the nick --- ND/Web/Pages/Alliances.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ND/Web/Pages/Alliances.pm b/ND/Web/Pages/Alliances.pm index 706d3fc..311adb3 100644 --- a/ND/Web/Pages/Alliances.pm +++ b/ND/Web/Pages/Alliances.pm @@ -60,11 +60,11 @@ sub render_body { UPDATE planets SET alliance_id = $2, nick = coalesce($3,nick) WHERE id = $1; }); - while ($coords =~ m/(\d+):(\d+):(\d+)(?:\s+nick=\s*(\S+))?/g){ + while ($coords =~ m/(\d+):(\d+):(\d+)(?:\s+nick=(\S+))?/g){ my ($id) = $DBH->selectrow_array($findplanet,undef,$1,$2,$3) or $ND::ERROR .= p $DBH->errstr; if ($addplanet->execute($id,$alliance->{id},$4)){ my $nick = ''; - $nick = '(nick $4)' if defined $4; + $nick = "(nick $4)" if defined $4; $error .= "

Added planet $1:$2:$3 $nick to this alliance

"; intel_log $ND::UID,$id,"HC Added planet $1:$2:$3 $nick to alliance: $alliance->{id} ($alliance->{name})"; }else{ -- 2.39.2