Try to be a little bit more helpful with "Strange attribute syntax..."
warnings. (Actually, is syntax like foo="bar"foo="bar" actually valid?)
This commit is contained in:
parent
3c20689a73
commit
fc4cd326b1
|
|
@ -295,7 +295,13 @@ sub _extract_attributes ($;$) {
|
|||
error_normal((scalar(split(/\n/, $s)) - 1) . " more line(s) not shown.", undef);
|
||||
$this->_set_fatal( 1 );
|
||||
} else {
|
||||
warn_normal "Strange attribute syntax: $s\n", $lc;
|
||||
# There's something wrong with the attribute syntax.
|
||||
# We might be able to deduce a likely cause by looking more.
|
||||
if ($s =~ /^[a-z0-9]/is && "<foo $s>" =~ /^$re_tag_compat$/s) {
|
||||
warn_normal "Probably missing whitespace before or missing quotation mark near: $s\n", $lc;
|
||||
} else {
|
||||
warn_normal "Strange attribute syntax: $s\n", $lc;
|
||||
}
|
||||
}
|
||||
}
|
||||
return \%attr;
|
||||
|
|
|
|||
Loading…
Reference in New Issue