X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ND%2FWeb%2FPages%2FAlliances.pm;h=311adb3c7b726d41d452a7fdfd67dc4d21ce9154;hb=ba1186cc4ce22ed1460c20422dcc9594d07e84d6;hp=706d3fcd9c6e3d430a8aa81e6cba684a3e3704b6;hpb=bed2a0cd51e651e066ef77f68639557f5ca4bc25;p=ndwebbie.git 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{