Commit Diff

Commit:
c5c28543561eda2d2c5cb8fdd17735338fcb7da3
From:
noodle <noodle@pastanoggin.com>
Date:
Message:
set a default empty string value for "reply" variables
Actions:
Patch | Tree
commit - b8d800b81cd3af0db4ec48a50e26531b81066e23
commit + c5c28543561eda2d2c5cb8fdd17735338fcb7da3
blob - ede8e7f1b35d292ca094edb08325d5dfe67e5946
blob + 0753afded8a37af09fd7b75f5d67724b0fd51130
--- mata_bot.pl
+++ mata_bot.pl
@@ -46,7 +46,7 @@ sub randint {
 
 sub respond_command {
 	my ($ball, $hellos, $sender_nick, $content) = @_;
-	my $reply;
+	my $reply = '';
 	if ($content =~ /\b{wb}([1-9]\d*)?d([1-9]\d*)\b{wb}/) {
 		# we got dice
 		my $ndice = $1 // 1;
@@ -130,7 +130,7 @@ sub respond_command {
 
 sub respond_mention {
 	my ($quotes, $sender_nick, $message) = @_;
-	my $reply;
+	my $reply = '';
 	if ($sender_nick eq $MOTHER) {
 		$reply = "Yes, mother? ${MATA_HAPPY}";
 	} elsif ($message =~ /^\b${NICK_RE}\b$/) {
@@ -144,7 +144,7 @@ sub respond_mention {
 # respond to channel
 sub respond {
 	my ($lists, $subbuffer, $sender_nick, $message) = @_;
-	my $reply;
+	my $reply = '';
 	if ($subbuffer->{$sender_nick} && $message =~ m,\b{wb}s/([^/]+)/([^/]*)(?:/([gi]*))?,) {
 		# chat s///
 		my $prev_message = $subbuffer->{$sender_nick};