Properly use HTML::StripScripts::Parser in the 'testdata' filter.

git-svn-id: svn://10.0.0.236/trunk@184879 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
zach%zachlipton.com
2005-11-18 02:27:11 +00:00
parent 8de871cc8d
commit b80e2a7bcb

View File

@@ -65,13 +65,14 @@ my %constants;
$constants{litmus_version} = $Litmus::Config::version;
# html tag stripper:
my $strip = HTML::StripScripts::Parser->new({
Context => 'Inline',
AllowHref => 1,
BanAllBut => ['a', 'b', 'br', 'em', 'p', 'i', 'hr',
'ul', 'ol', 'li'],
strict_names => 1,
});
my $strip = HTML::StripScripts::Parser->new(
{
AllowHref => 1,
BanAllBut => ['a', 'b', 'br', 'em', 'p', 'i', 'hr',
'ul', 'ol', 'li'],
},
strict_names => 1,
);
###############################################################################
# Templatization Code