Fix harmless undefined variable warning

This commit is contained in:
Pragmatic Software 2017-08-08 21:18:45 -07:00
parent c3067533b2
commit c8fa308113
1 changed files with 1 additions and 1 deletions

View File

@ -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/;