--- deliantra/Deliantra-Client/DC/Protocol.pm 2006/06/12 13:26:14 1.32 +++ deliantra/Deliantra-Client/DC/Protocol.pm 2006/06/12 14:06:27 1.33 @@ -781,8 +781,6 @@ my ($msg, @kw) = split /\x00/, $msg; $self->{kw}{$_} = 1 for @kw; - warn "<<<<@kw>>>>\n";#d# - $msg = CFClient::UI::Label::escape $msg; my $match = join "|", map "\\b\Q$_\E\\b", sort { (length $b) <=> (length $a) } keys %{ $self->{kw} }; $msg =~ s/($match)/$1<\/span>/gi; # underline when http-ready, huh.