<%ARGS> $Plugin => ''

<% $text |n%>

<%ONCE> use RTx::Shredder::Plugin; my $plugin_obj = new RTx::Shredder::Plugin; my %plugins = $plugin_obj->List; <%INIT> my $file = $plugins{ $Plugin }; unless( $file ) { $RT::Logger->error( "Couldn't find plugin '$Plugin'" ); return; } use RTx::Shredder::POD qw(); my $text = ''; open my $io_handle, ">:scalar", \$text or die "Can't open scalar for write: $!"; RTx::Shredder::POD::plugin_html( $file, $io_handle ); close $io_handle;