From 94a94c36cf0eba38b85b8fb6c360c14abae7031f Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 21 Apr 2017 22:35:57 -0400 Subject: added debug-me --watch mode This commit was sponsored by Ewen McNeill. --- debug-me.hs | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'debug-me.hs') diff --git a/debug-me.hs b/debug-me.hs index ea2d6af..9319483 100644 --- a/debug-me.hs +++ b/debug-me.hs @@ -1,12 +1,13 @@ module Main where import CmdLine -import qualified Role.User -import qualified Role.Developer -import qualified Role.Downloader import Graphviz import Replay import Server +import qualified Role.User +import qualified Role.Developer +import qualified Role.Downloader +import qualified Role.Watcher import Network.Socket import System.Exit @@ -18,6 +19,7 @@ main = withSocketsDo $ do UserMode o -> Role.User.run o >>= exitWith DeveloperMode o -> Role.Developer.run o DownloadMode o -> Role.Downloader.run o + WatchMode o -> Role.Watcher.run o GraphvizMode o -> graphviz o ReplayMode o -> replay o ServerMode o -> server o -- cgit v1.2.3