From aaddda85c74540d1dab452dcdddf425927983ea9 Mon Sep 17 00:00:00 2001
From: tv <tv@krebsco.de>
Date: Sun, 27 Jan 2019 00:20:34 +0100
Subject: Reaktor.Plugins.System: JOIN has only one param

---
 src/Reaktor/Plugins/System.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Reaktor/Plugins/System.hs b/src/Reaktor/Plugins/System.hs
index 3d6ec5c..a39bd23 100644
--- a/src/Reaktor/Plugins/System.hs
+++ b/src/Reaktor/Plugins/System.hs
@@ -36,8 +36,8 @@ import qualified Text.Regex.PCRE.Light as RE
 new :: Config -> Actions -> IO (Message -> IO ())
 new config@Config{..} actions@Actions{..} = do
     pure $ \case
-        Message (Just prefix) cmd (msgtarget:text:[]) | elem cmd ["PRIVMSG", "JOIN"] -> do
-          let hooks = maybe [] id (M.lookup cmd cHooks)
+        Message (Just prefix) "PRIVMSG" (msgtarget:text:[]) -> do
+          let hooks = maybe [] id (M.lookup "PRIVMSG" cHooks)
           mapM_ (\h -> run1 config actions h prefix msgtarget text) hooks
 
         Message (Just prefix) "JOIN" (channel:[]) -> do
-- 
cgit v1.2.3