Those 2 filters should return safe output as well
Signed-off-by: Owen Leonard <oleonard@myacpl.org>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
# Already escaped with a special filter
# We could escape it but should be safe
or $tt_block =~ m{\s?\|\s?\$KohaDates[^\|]*$}
+ or $tt_block =~ m{\s?\|\s?\$Price[^\|]*$}
+ or $tt_block =~ m{\s?\|\s?\$HtmlTags[^\|]*$}
# Already escaped correctly with raw
or $tt_block =~ m{\|\s?\$raw}
: q| |;
if ( $tt_block =~ m{\s?\|\s?\$KohaDates[^\|]*\|.*$}
+ or $tt_block =~ m{\s?\|\s?\$Price[^\|]*\|.*$}
+ or $tt_block =~ m{\s?\|\s?\$HtmlTags[^\|]*\|.*$}
) {
$tt_block =~
s/\s*\|\s*(uri|url|html)\s*$//; # Could be another filter...
is_deeply( \@missing_filters, [], 'html_entity is a valid filter for href' );
};
-subtest 'Do not escape KohaDates output' => sub {
+subtest 'Do not escape KohaDates|Prices|HtmlTags output' => sub {
plan tests => 2;
my $input = <<INPUT;
[% var | \$KohaDates %]
[% var | \$KohaDates with_hours => 1 %]
[% var | \$KohaDates | html %]
[% var | \$KohaDates with_hours => 1 | html %]
+[% var | \$Price %]
+[% var | \$HtmlTags %]
INPUT
my $expected = <<EXPECTED;
[% var | \$KohaDates with_hours => 1 %]
[% var | \$KohaDates %]
[% var | \$KohaDates with_hours => 1 %]
+[% var | \$Price %]
+[% var | \$HtmlTags %]
EXPECTED
my $new_content = t::lib::QA::TemplateFilters::fix_filters($input);