Index: lib/TWiki/Plugins.pm =================================================================== --- lib/TWiki/Plugins.pm (revision 3920) +++ lib/TWiki/Plugins.pm (working copy) @@ -402,12 +402,20 @@ # note this is invoked with the session as the first parameter sub _handleACTIVATEDPLUGINS { - my $this = shift->{plugins}; + my ($session, $params) = @_; + my $this = $session->{plugins}; my $text = ''; + my $format = $params->{'format'} || '$web.$topic, '; foreach my $plugin ( @{$this->{plugins}} ) { - unless( $plugin->{disabled} ) { - $text .= "$plugin->{web}.$plugin->{name}, "; - } + unless( $plugin->{disabled} ) { + my $tmp = $format; + my $pluginName = $plugin->{name}; + $pluginName =~ s/Plugin$//o; + $tmp =~ s/\$topic/$plugin->{'name'}/g; + $tmp =~ s/\$web/$plugin->{'web'}/g; + $tmp =~ s/\$name/$pluginName/g; + $text .= $tmp; + } } $text =~ s/\,\s*$//o; return $text;