at master 1.7 kB view raw
1diff --git a/src/Main.hs b/src/Main.hs 2index 61da2f3..39e5c9b 100644 3--- a/src/Main.hs 4+++ b/src/Main.hs 5@@ -73,11 +73,14 @@ main = do 6 config' <- sequence config 7 dir <- P.getDataDir 8 exitWith <=< lambdabotMain modulesInfo $ 9- [dataDir ==> dir, lbVersion ==> P.version] ++ config' 10+ [dataDir ==> dir, lbVersion ==> P.version] ++ configInfo ++ config' 11 12 -- special online target for ghci use 13 online :: [String] -> IO () 14 online strs = do 15 dir <- P.getDataDir 16- void $ lambdabotMain modulesInfo 17- [dataDir ==> dir, lbVersion ==> P.version, onStartupCmds ==> strs] 18+ void $ lambdabotMain modulesInfo $ 19+ [dataDir ==> dir, lbVersion ==> P.version, onStartupCmds ==> strs] ++ configInfo 20+ 21+configInfo :: [DSum Config Identity] 22+configInfo = @config@ 23diff --git a/src/Modules.hs b/src/Modules.hs 24index 036ea1f..eaafa50 100644 25--- a/src/Modules.hs 26+++ b/src/Modules.hs 27@@ -14,10 +14,15 @@ import Lambdabot.Plugin.Reference 28 import Lambdabot.Plugin.Social 29 30 modulesInfo :: Modules 31-modulesInfo = $(modules $ corePlugins 32- ++ haskellPlugins 33- ++ ["irc", "localtime", "topic"] -- ircPlugins 34- ++ ["dummy", "fresh", "todo"] -- miscPlugins 35- ++ ["bf", "dice", "elite", "filter", "quote", "slap", "unlambda", "vixen"] -- noveltyPlugins 36- ++ referencePlugins 37- ++ socialPlugins) 38+modulesInfo = 39+ $(modules $ 40+ let oldDefaultModules = 41+ corePlugins 42+ ++ haskellPlugins 43+ ++ ["irc", "localtime", "topic"] -- ircPlugins 44+ ++ ["dummy", "fresh", "todo"] -- miscPlugins 45+ ++ ["bf", "dice", "elite", "filter", "quote", "slap", "unlambda", "vixen"] -- noveltyPlugins 46+ ++ referencePlugins 47+ ++ socialPlugins 48+ in @modules@ 49+ )