diff options
Diffstat (limited to 'app/Main.hs')
| -rw-r--r-- | app/Main.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/app/Main.hs b/app/Main.hs index 74a03eb..ea64179 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -199,10 +199,13 @@ app = serve api server api :: Proxy API api = Proxy +servall :: ServerConfig -> IO () +servall config = run (configPort config) app + main :: IO () main = do config <- execParser opts - run (configPort config) app + servall config where opts = info (optParser <**> helper) |