diff options
| -rwxr-xr-x | saxrobot | 8 | 
1 files changed, 8 insertions, 0 deletions
@@ -92,6 +92,14 @@ sub irc_msg {  		$irc->yield(privmsg => $nick => "I am bot, go away");  		return;  	} +	if ($what =~ /^nick\s/) { +		my ($channel) = $what =~ /^nick\s+(\S+)$/; +		if ($channel) { +			$irc->yield(nick => $channel); +		} else { +			$irc->yield(privmsg => $nick => "Syntax: nick <nick>"); +		} +	}  	if ($what =~ /^part\s/) {  		my ($channel) = $what =~ /^part\s+(\S+)$/;  		if ($channel) {  | 
