diff options
Diffstat (limited to '')
| -rw-r--r-- | Hsbot/Command.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Hsbot/Command.hs b/Hsbot/Command.hs index 76f1d04..3977a57 100644 --- a/Hsbot/Command.hs +++ b/Hsbot/Command.hs @@ -58,7 +58,7 @@ dispatchMessage (InputMsg inputMsg) = do sendRunCommand cmd plugin = do sendToPlugin (InternalCmd $ IntCmd "RUN" "CORE" (pluginName plugin) cmd) plugin getMsgContent :: String - getMsgContent = (parameters inputMsg) !! 1 + getMsgContent = unwords . tail $ parameters inputMsg dispatchMessage _ = return () -- | Processes an internal command |