Config.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

module Config
    ( config
    , defaultPlugins
    ) where

import Network

import Hsbot.Types

-- | Imported plugins goes there
defaultPlugins :: [String]
defaultPlugins = [ "Ping", "Quote" ]

-- | User server
kro :: IrcServer
kro = IrcServer
    { serverAddress  = "perseus"
    , serverPort     = PortNumber 6667
    , joinChannels   = ["#shbot"]
    , nickname       = "hsbot"
    , password       = ""
    , realname       = "The One True bot, with it's haskell soul."
    , administrators = ["julien"]
    }

-- | User configuration
config :: Config
config = Config
    { commandPrefix = '@'
    , ircServer     = kro
    }