| 74 |
if ($nsuri eq q<$HTML_NS>) { |
if ($nsuri eq q<$HTML_NS>) { |
| 75 |
$attr_xname = q[undef, [undef, $attr_name]]; |
$attr_xname = q[undef, [undef, $attr_name]]; |
| 76 |
} else { |
} else { |
| 77 |
## NOTE: "Adjust SVG attributes" (SVG only) and |
## NOTE: "Adjust SVG attributes" (SVG only), |
| 78 |
|
## "adjust MathML attributes" (MathML only), and |
| 79 |
## "adjust foreign attributes". |
## "adjust foreign attributes". |
| 80 |
$attr_xname = qq[ |
$attr_xname = qq[ |
| 81 |
\@{ |
\@{ |
| 82 |
\$foreign_attr_xname->{\$attr_name} || |
\$foreign_attr_xname->{\$attr_name} || |
| 83 |
[undef, [undef, |
[undef, [undef, |
| 84 |
$nsuri eq \$SVG_NS ? |
($nsuri) eq \$SVG_NS ? |
| 85 |
(\$svg_attr_name->{\$attr_name} || \$attr_name) : |
(\$svg_attr_name->{\$attr_name} || \$attr_name) : |
| 86 |
|
($nsuri) eq \$MML_NS ? |
| 87 |
|
(\$attr_name eq 'definitionurl' ? |
| 88 |
|
'definitionURL' : \$attr_name) : |
| 89 |
\$attr_name]] |
\$attr_name]] |
| 90 |
} |
} |
| 91 |
]; |
]; |