--
-- | Hello world plugin
--
module Lambdabot.Plugin.Misc.Hello (helloPlugin) where

import Lambdabot.Plugin

helloPlugin :: Module ()
helloPlugin :: Module ()
helloPlugin = forall st. Module st
newModule
    { moduleCmds :: ModuleT () LB [Command (ModuleT () LB)]
moduleCmds = forall (m :: * -> *) a. Monad m => a -> m a
return
        [ (String -> Command Identity
command String
"hello")
            { aliases :: [String]
aliases = [String
"goodbye"]
            , help :: Cmd (ModuleT () LB) ()
help = forall (m :: * -> *). Monad m => String -> Cmd m ()
say String
"hello/goodbye <arg>. Simplest possible plugin"
            , process :: String -> Cmd (ModuleT () LB) ()
process = \String
xs -> forall (m :: * -> *). Monad m => String -> Cmd m ()
say (String
"Hello world. " forall a. [a] -> [a] -> [a]
++ String
xs)
            }
        ]
    }