From 7854cc06fdbb873f3ac124204792f05385bcb118 Mon Sep 17 00:00:00 2001
From: Joscha <joscha@plugh.de>
Date: Wed, 22 Jan 2020 21:40:30 +0000
Subject: [PATCH] Fix nick of example bot in readme

---
 CHANGELOG.md | 3 +++
 README.md    | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 77d17d8..535c6a4 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,8 @@
 # Changelog for haboli
 
+## upcoming
+* fix nick of example bot in readme
+
 ## 0.3.1.0
 * add `Haboli.Euphoria` module
 * add proper README
diff --git a/README.md b/README.md
index b50dd81..cbe340e 100644
--- a/README.md
+++ b/README.md
@@ -30,7 +30,7 @@ pingPongBot :: Client () ()
 pingPongBot = forever $ do
   event <- respondingToPing nextEvent
   case event of
-    EventSnapshot _ -> void $ nick "TreeBot"
+    EventSnapshot _ -> void $ nick "PingPongBot"
     EventSend e ->
       let msg = sendMessage e
       in  when (msgContent msg == "!ping") $