aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorlassulus <lassulus@lassul.us>2021-10-25 10:21:30 +0200
committerlassulus <lassulus@lassul.us>2021-10-25 10:21:30 +0200
commit82afc7fafb0be0c6a899d343643db449d5b5f2bb (patch)
tree492d4aa1b34024963585e5d2ec4d5541ca7da130 /src
parent33b534acd07c8b6f32e9cf5539ca7d1812c7e0a7 (diff)
Reaktor.API: allow NOTICE message
Diffstat (limited to 'src')
-rw-r--r--src/Reaktor/API.hs3
1 files changed, 3 insertions, 0 deletions
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