From 753cdfe8c18b470da4a4807815d0aaade53f1d16 Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Fri, 5 Feb 2021 21:56:20 -0500 Subject: Add 'tidy' to Plan This is supposed to be how to cleanup the database and any other local files. Should only be used before/after test, so maybe I can find a way to enforce this constraint somehow in the code. --- Biz/Que/Host.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Biz/Que/Host.hs') 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 -- cgit v1.2.3