Chris/webperl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix spurious conversion of newlines to li in ul during tidying.

Browse Source
This commit is contained in:
Chris 2014-03-20 10:57:26 +00:00
parent c4dda13372
commit aa8b67acd8
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Webperl/Block.pm
View File

@ -404,6 +404,9 @@ sub validate_htmlarea {
return ("", , $self -> {"template"} -> replace_langvar("BLOCK_VALIDATE_TIDYFAIL", {"***field***" => $settings -> {"nicename"}})) return ("", , $self -> {"template"} -> replace_langvar("BLOCK_VALIDATE_TIDYFAIL", {"***field***" => $settings -> {"nicename"}}))
if(!$tidied); if(!$tidied);
# Tidy will stick in spurious list elements, remove them
$tidied =~ s|<li style="list-style: none"></li>\n||g;
# Now we can go ahead and check with the validator to see whether the tidied # Now we can go ahead and check with the validator to see whether the tidied
# code is valid xhtml # code is valid xhtml
my $valid = check_xhtml($tidied); my $valid = check_xhtml($tidied);