diff options
Diffstat (limited to 'debug-me.hs')
-rw-r--r-- | debug-me.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/debug-me.hs b/debug-me.hs index 25f18b8..ea2d6af 100644 --- a/debug-me.hs +++ b/debug-me.hs @@ -3,6 +3,7 @@ module Main where import CmdLine import qualified Role.User import qualified Role.Developer +import qualified Role.Downloader import Graphviz import Replay import Server @@ -16,6 +17,7 @@ main = withSocketsDo $ do case mode c of UserMode o -> Role.User.run o >>= exitWith DeveloperMode o -> Role.Developer.run o + DownloadMode o -> Role.Downloader.run o GraphvizMode o -> graphviz o ReplayMode o -> replay o ServerMode o -> server o |