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