archive/oddmuse
2
0
Fork 0
forked from github/kensanata.oddmuse
Code Pull Requests Activity

(StrangeNewBannedContent): Protect $1.

Browse Source
This commit is contained in:
Alex Schroeder
2006-08-15 09:25:07 +00:00
parent 281aac5a05
commit 7c5eeab893
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
modules/strange-spam.pl
View File

@@ -16,7 +16,7 @@
# 59 Temple Place, Suite 330
# Boston, MA 02111-1307 USA
$ModulesDescription .= '<p>$Id: strange-spam.pl,v 1.8 2006/08/15 09:23:16 as Exp $</p>';
$ModulesDescription .= '<p>$Id: strange-spam.pl,v 1.9 2006/08/15 09:25:07 as Exp $</p>';
use vars qw($StrangeBannedContent);
@@ -48,7 +48,8 @@ sub StrangeNewBannedContent {
my $regexp = $_;
next unless $regexp; # skip empty strings
if ($str =~ /($regexp)/i) {
return Tss('Rule "%1" matched "%2" on this page.', QuoteHtml($regexp), $1);
my $match = $1;
return Tss('Rule "%1" matched "%2" on this page.', QuoteHtml($regexp), $match);
}
}
return 0;