diff --git a/PBot/Interpreter.pm b/PBot/Interpreter.pm index 30e04b9e..32301350 100644 --- a/PBot/Interpreter.pm +++ b/PBot/Interpreter.pm @@ -202,7 +202,7 @@ sub interpret { $keyword = $command; } - $tonick = $nick if $tonick eq 'me'; + $tonick = $nick if defined $tonick and $tonick eq 'me'; if ($keyword !~ /^(factadd|add|factfind|find|factshow|show|forget|factdel|factset|factchange|change|msg|tell)/) { $keyword =~ s/(\w+)([?!.]+)$/$1/;