From 3c554f7187e4356d823b79aef46bf511827df002 Mon Sep 17 00:00:00 2001 From: Ben Date: Wed, 7 Apr 2010 22:24:52 +0000 Subject: [PATCH] ICQ process_message must also call escapeHTML. --- perl/lib/Thrasher/Protocol/Purple/ICQ.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/perl/lib/Thrasher/Protocol/Purple/ICQ.pm b/perl/lib/Thrasher/Protocol/Purple/ICQ.pm index 3c1d5f6..fdf633a 100644 --- a/perl/lib/Thrasher/Protocol/Purple/ICQ.pm +++ b/perl/lib/Thrasher/Protocol/Purple/ICQ.pm @@ -18,6 +18,12 @@ sub prpl { return "prpl-icq"; } +sub process_message { + my ($self, $body_text) = @_; + + return escapeHTML($body_text); +} + sub process_remote_username { my $self = shift; my $s = shift; -- 2.11.4.GIT