my $username = substr($address, 0, index($address,'@'));
my $host = substr($address, index($address,'@')+1);
- if($channel =~ m/($bitlbeeChannel)/ and $nick =~ m/$username/ and $nick =~ m/^u\d+/ and $host =~ m/($facebookhostname)/ )
+ if($channel =~ m/($bitlbeeChannel)/ and $nick =~ m/$username/ and $nick =~ m/^(u|-)\d+/ and $host =~ m/($facebookhostname)/ )
{
$nicksToRename{$nick} = $channel;
- $server->command("whois $nick");
+ $server->command("whois -- $nick");
}
}