diff --git a/PBot/FactoidCommands.pm b/PBot/FactoidCommands.pm index 03be091d..bee91cb3 100644 --- a/PBot/FactoidCommands.pm +++ b/PBot/FactoidCommands.pm @@ -592,7 +592,7 @@ sub factmove { my $self = shift; my ($from, $nick, $user, $host, $arguments) = @_; $arguments = validate_string($arguments); - my ($src_channel, $source, $target_channel, $target) = split /\s+/, $arguments, 4 if $arguments; + my ($src_channel, $source, $target_channel, $target) = split /\s+/, $arguments, 5 if length $arguments; my $usage = "Usage: factmove [target factoid]";