package Plugins::TextCommands; use strict; return bless({ command_handlers => { 'renee' => \&renee_handler, }, }); sub custom_handler { my($self,$main,$command,$text) = @_; my @ret=(); if ($text ne '') { my $output = $main->createOutput( { template => $command, name => $main->{current_user}{name}, nick => $main->{current_user}{nick}, color => $main->{current_user}{color}, text => $main->toHTML($text), }); $output->restrictToCurrentRoom; push @ret,$output; } return \@ret; }