X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/51a0ea44fe475a940f9300326d3a29a44db123fe..d8be5cc409de5b3bc34439599b1481201a5a1c2e:/SL/HTML/Restrict.pm diff --git a/SL/HTML/Restrict.pm b/SL/HTML/Restrict.pm index ad8ff387b..3be417112 100644 --- a/SL/HTML/Restrict.pm +++ b/SL/HTML/Restrict.pm @@ -7,7 +7,7 @@ use HTML::Restrict (); sub create { my ($class, %params) = @_; - $params{allowed_tags} //= { map { ($_ => ['/']) } qw(b strong i em u ul ol li sub sup s strike br p div) }; + $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) }; return HTML::Restrict->new(rules => $params{allowed_tags}); }