diff options
author | Daniel Schadt <kingdread@gmx.de> | 2020-03-03 14:24:18 +0100 |
---|---|---|
committer | Daniel Schadt <kingdread@gmx.de> | 2020-03-03 14:27:37 +0100 |
commit | 74b373d23d35446d772d6bb2b01c49ca38978236 (patch) | |
tree | 609a80fb5f7512e21fd792db33fe8a372bdf87c3 /app | |
parent | 7f11cf1617aed8930598d7bd908ee1625cbc97f7 (diff) | |
download | simghost-74b373d23d35446d772d6bb2b01c49ca38978236.tar.gz simghost-74b373d23d35446d772d6bb2b01c49ca38978236.tar.bz2 simghost-74b373d23d35446d772d6bb2b01c49ca38978236.zip |
reorganize module
This switches some definitions around and wraps App in a newtype, in
preparation for more cleanup.
Diffstat (limited to 'app')
-rw-r--r-- | app/Main.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/app/Main.hs b/app/Main.hs index 46bd5a3..c67fe9c 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -1,6 +1,6 @@ module Main where -import Lib +import ImageHoster import Control.Exception import Data.Aeson import Data.Maybe @@ -14,6 +14,4 @@ loadSettings = do main :: IO () -main = do - settings <- loadSettings - runApp settings imgHostMain +main = loadSettings >>= run imgHostMain |