Revision 2e3d3c25
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
| SL/HTML/Restrict.pm | ||
|---|---|---|
| 7 | 7 |
|
| 8 | 8 |
sub create {
|
| 9 | 9 |
my ($class, %params) = @_; |
| 10 |
$params{allowed_tags} //= { map { ($_ => ['/']) } qw(b strong i em u ul ol li sub sup s strike br p div) };
|
|
| 10 |
$params{allowed_tags} //= { map { ($_ => ['/']) } qw(b strong i em u ul ol li sub sup s strike br p div table caption thead tbody tr th td) };
|
|
| 11 | 11 |
|
| 12 | 12 |
return HTML::Restrict->new(rules => $params{allowed_tags});
|
| 13 | 13 |
} |
Auch abrufbar als: Unified diff
HTML::Restrict: Tabellen-Tags zu eingeschränkten HTML-Tags hinzugefügt