Make sure ampersand is encoded as & since jade seems to be confused

when it is encoded as & inside an entity.

MFC after:	3 days
This commit is contained in:
Simon L. B. Nielsen 2004-09-04 20:40:15 +00:00
parent d92f8bed06
commit 6b7e211c1a
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=134770

View file

@ -131,6 +131,9 @@ sub normalize (@) {
foreach my $l (@lines) {
$l =~ s/\\&//g;
$l =~ s:([\x21-\x2f\x5b-\x60\x7b-\x7f]):sprintf("&\#\%d;", ord($1)):eg;
# Make sure ampersand is encoded as & since jade seems to
# be confused when it is encoded as & inside an entity.
$l =~ s/&/&/g;
}
return (wantarray) ? @lines : join "", @lines;
}