aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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 f846cf2..40888e1 100644
--- a/src/Reaktor/API.hs
+++ b/src/Reaktor/API.hs
@@ -85,6 +85,9 @@ main Actions{..} = \case
msg@(Message Nothing PRIVMSG [msgtarget,_]) | isChannelName msgtarget -> do
liftIO $ aSend msg
return NoContent
+ msg@(Message Nothing TOPIC [msgtarget,_]) | isChannelName msgtarget -> do
+ liftIO $ aSend msg
+ return NoContent
_ ->
throwError err403
where