From c46b6bbbc7a7a0c7949c4c6d57613b90da73bf93 Mon Sep 17 00:00:00 2001
From: David Phillips <david@yeah.nah.nz>
Date: Sun, 15 Mar 2020 17:11:50 +1300
Subject: Add some misc zest to Natural.pm

---
 Plugin/Greet.pm   | 1 +
 Plugin/Natural.pm | 2 ++
 2 files changed, 3 insertions(+)

diff --git a/Plugin/Greet.pm b/Plugin/Greet.pm
index 4d221c2..d223ff0 100644
--- a/Plugin/Greet.pm
+++ b/Plugin/Greet.pm
@@ -70,6 +70,7 @@ sub on_join {
 			"$nick!!!!! guys!!!!!! $nick is here !!!!!!!!",
 			"weclome $nick",
 			"Welcome to $where, $nick. Leave your sanity at the door",
+			"It smells like up dog in here",
 			"I feel sick");
 	}
 	$irc->delay([privmsg => $where => $response], 1+rand(5));
diff --git a/Plugin/Natural.pm b/Plugin/Natural.pm
index 58c7f96..53c799f 100644
--- a/Plugin/Natural.pm
+++ b/Plugin/Natural.pm
@@ -75,6 +75,8 @@ sub choose_normal_response {
 		return some("?", "ö", ":O", "!!");
 	} elsif ($what =~ /^help\b/i) {
 		return some("D:", "ono", "*throws a lifeline to $nick");
+	} elsif ($what =~ /^ooo$/i) {
+		return some("jjj");
 	} elsif ($what =~ /(:D|:\)|D:|:\||:\\|:C|:S)/) {
 		return some(":D", ":)", "D:", ":|", ":/", ":\\", ":S", ">:D", ">:(", ">>>:CCCC");
 	} elsif ($what eq "o/") {
-- 
cgit v1.1