X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=search.cgi;h=e3eb882bcd27171a4898b46688b95da77bce033d;hb=449fb36b879fe6aca6347db51f1c00d4865144be;hp=9cb62b3361052500d59ac44dfcdc8bf9e06f33ee;hpb=b564a1a3a3b8c9363004b2f0f6bc4fe761d4a2d8;p=mirror%2Fuserdir-ldap-cgi.git diff --git a/search.cgi b/search.cgi index 9cb62b3..e3eb882 100755 --- a/search.cgi +++ b/search.cgi @@ -118,6 +118,9 @@ if (!$dosearch) { foreach $dn (sort {$entries->{$a}->{sn}->[0] <=> $entries->{$b}->{sn}->[0]} keys(%$entries)) { my $ok = 0; $data = $entries->{$dn}; + for my $key (keys %{$data}) { + @{$data->{$key}} = map { CGI::escapeHTML($_); } @{$data->{$key}}; + } # These are local variables.. i have enough global vars as it is... my ($ufdn, $login, $name, $icquin, $jabberjid, $email, $fingerprint, @@ -223,7 +226,7 @@ if (!$dosearch) { $outsub{searchresults} .= FormatEntry($dataspecref->{latlong}, $latlong); $outsub{searchresults} .= FormatEntry($dataspecref->{phone}, $data->{telephonenumber}->[0] || "- unlisted -"); $outsub{searchresults} .= FormatEntry($dataspecref->{fax}, $data->{fascimiletelephonenumber}->[0] || "- unlisted -"); - $outsub{searchresults} .= FormatEntry($dataspecref->{VoIP}, $data->{VoIP}->[0] || "- unlisted -"); + $outsub{searchresults} .= FormatEntry($dataspecref->{VoIP}, $data->{voip}->[0] || "- unlisted -"); $outsub{searchresults} .= FormatEntry($dataspecref->{lastseen}, $lastseen); # $outsub{searchresults} .= FormatEntry($dataspecref->{created}, $created); # $outsub{searchresults} .= FormatEntry($dataspecref->{modified}, $modified);