input is lowercase fixes #4

notori0us · Mar 5, 2014 · 7f05cec · 7f05cec
1 parent b3a2b4c
commit 7f05cec
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/shibabot.pl b/shibabot.pl
@@ -30,6 +30,8 @@ sub said {
 		$text =~ s/^\.doge\ //;
 
 		(my $word) = $text=~/(\w+)/;
+		# lowercase input
+		$word = lc($word)
 
 
 		# read through thesaurus to find synonyms