ping pong hell
This commit is contained in:
parent
a5267b8cdd
commit
d1c707b432
|
@ -71,8 +71,7 @@ sub process {
|
|||
|
||||
sub cmd_pong {
|
||||
my $command = shift @_;
|
||||
$command =~ s/^://;
|
||||
pong($command =~ /^\d+$/ ? $command : "$CONF{nick} $command")
|
||||
pong($command =~ /^:\d+$/ ? $command : "$CONF{nick} $command")
|
||||
}
|
||||
|
||||
sub process_line {
|
||||
|
|
Loading…
Reference in New Issue