From: Christopher Allan Webber <cwebber@dustycloud.org>
Date: Tue, 24 Nov 2015 21:06:12 +0000 (-0600)
Subject: Show off some greetings
X-Git-Tag: v0.1.0~71
X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=31ac6136d78c1d5ed79e770060dad1fa56c2c453;p=8sync.git

Show off some greetings
---

diff --git a/demos/ircbot.scm b/demos/ircbot.scm
index 202c18c..9905dab 100755
--- a/demos/ircbot.scm
+++ b/demos/ircbot.scm
@@ -33,6 +33,9 @@
      (match action
        ("botsnack"
         (irc-format socket "PRIVMSG ~a :Yippie! *does a dance!*" channel))
+       ((or "hello" "hello!" "hello." "greetings" "greetings." "greetings!"
+            "hei" "hei." "hei!")
+        (irc-format socket "PRIVMSG ~a :Oh hi ~a!" channel speaker))
        ;; Add yours here
        (_
         (irc-format socket "PRIVMSG ~a :*stupid puppy look*" channel))))