From 82afc7fafb0be0c6a899d343643db449d5b5f2bb Mon Sep 17 00:00:00 2001
From: lassulus <lassulus@lassul.us>
Date: Mon, 25 Oct 2021 10:21:30 +0200
Subject: Reaktor.API: allow NOTICE message

---
 src/Reaktor/API.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Reaktor/API.hs b/src/Reaktor/API.hs
index 5836b12..f846cf2 100644
--- a/src/Reaktor/API.hs
+++ b/src/Reaktor/API.hs
@@ -79,6 +79,9 @@ main Actions{..} = \case
 
     serveTest :: Message -> Handler NoContent
     serveTest = \case
+        msg@(Message Nothing NOTICE [msgtarget,_]) | isChannelName msgtarget -> do
+            liftIO $ aSend msg
+            return NoContent
         msg@(Message Nothing PRIVMSG [msgtarget,_]) | isChannelName msgtarget -> do
             liftIO $ aSend msg
             return NoContent
-- 
cgit v1.2.3