escape nick

diff --git a/ND/Web/Pages/Intel.pm b/ND/Web/Pages/Intel.pm
index 44fbba34239164a1cbabd7a192bee94ae8b3d44f..c129d907c2109a465a28833533b54a6f0047ca8d 100644 (file)
--- a/ND/Web/Pages/Intel.pm
+++ b/ND/Web/Pages/Intel.pm
@@ -155,7 +155,7 @@ sub render_body {
        if ($planet){
                $BODY->param(Coords => $planet->{coords});
                $BODY->param(Planet => $planet->{id});
        if ($planet){
                $BODY->param(Coords => $planet->{coords});
                $BODY->param(Planet => $planet->{id});

-               $BODY->param(Nick => $planet->{nick});
+               $BODY->param(Nick => escapeHTML($planet->{nick}));

                $BODY->param(Channel => $planet->{channel});
                my @status;
                for my $status (" ","Friendly", "NAP", "Hostile"){
                $BODY->param(Channel => $planet->{channel});
                my @status;
                for my $status (" ","Friendly", "NAP", "Hostile"){