call => \&sanitize);
} # }}}
-sub sanitize ($) { #{{{
- return scrubber()->scrub(shift);
+sub sanitize (@) { #{{{
+ my %params=@_;
+ return scrubber()->scrub($params{content});
} # }}}
my $_scrubber;
selected shape size span src start summary
tabindex target title type usemap valign
value vspace width
- }}],
+ }, "/" => 1, # emit proper <hr /> XHTML
+ }],
);
return $_scrubber;
} # }}}