Bug 38872: Parse all 'a' element, not only the first one

Test plan:
Apply the "Add test" commit
% prove t/template_filters.t
=> Fail
Apply this patch
% prove t/template_filters.t
=> Success
% prove xt/find-missing-filters.t
=> Fail
Apply the last patch "Fix occurrences"
% prove xt/find-missing-filters.t
=> Success

Signed-off-by: Owen Leonard <oleonard@myacpl.org>
Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Matt Blenkinsop <matt.blenkinsop@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Jonathan Druart 2025-01-13 14:40:40 +01:00 committed by Katrin Fischer
parent 7fdf2983a9
commit 3e5fa21f85
No known key found for this signature in database
GPG Key ID: 0EF6E2C03357A834
1 changed files with 1 additions and 1 deletions

View File

@ -77,7 +77,7 @@ sub _process_tt_content {
if $line =~ m{\[%(\s|-|~)*USE raw(\s|-|~)*%\]}; # Does [% Use raw %] exist?
my $e;
if ( $line =~ qr{<a href="([^"]+)} ) {
while ( $line =~ m{<a href="([^"]+)}g ) {
my $to_uri_escape = $1;
while (
$to_uri_escape =~ m{