diff options
Diffstat (limited to 'Biz/Que')
| -rw-r--r-- | Biz/Que/Host.hs | 2 | ||||
| -rw-r--r-- | Biz/Que/Site.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/Biz/Que/Host.hs b/Biz/Que/Host.hs index e40b2e0..57507ae 100644 --- a/Biz/Que/Host.hs +++ b/Biz/Que/Host.hs @@ -57,7 +57,7 @@ import qualified Prelude {-# ANN module ("HLint: ignore Reduce duplication" :: Prelude.String) #-} main :: IO () -main = Cli.main <| Cli.Plan help move test +main = Cli.main <| Cli.Plan help move test pure move :: Cli.Arguments -> IO () move _ = Exception.bracket startup shutdown <| uncurry Warp.run diff --git a/Biz/Que/Site.hs b/Biz/Que/Site.hs index 0d89400..77498b4 100644 --- a/Biz/Que/Site.hs +++ b/Biz/Que/Site.hs @@ -40,7 +40,7 @@ import System.FilePath ((</>)) import qualified System.Process as Process main :: IO () -main = Cli.main <| Cli.Plan help move test +main = Cli.main <| Cli.Plan help move test pure move :: Cli.Arguments -> IO () move args = do |