diff options
| -rw-r--r-- | src/Hakyll/Commands.hs | 4 | ||||
| -rw-r--r-- | src/Hakyll/Main.hs | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/src/Hakyll/Commands.hs b/src/Hakyll/Commands.hs index 882fa09..6763fe7 100644 --- a/src/Hakyll/Commands.hs +++ b/src/Hakyll/Commands.hs @@ -50,8 +50,8 @@ build conf logger rules = fst <$> run conf logger rules -------------------------------------------------------------------------------- -- | Run the checker and exit -check :: Configuration -> Logger -> Check.Check -> IO () -check config logger check' = Check.check config logger check' >>= exitWith +check :: Configuration -> Logger -> Check.Check -> IO ExitCode +check = Check.check -------------------------------------------------------------------------------- diff --git a/src/Hakyll/Main.hs b/src/Hakyll/Main.hs index b48743b..d034887 100644 --- a/src/Hakyll/Main.hs +++ b/src/Hakyll/Main.hs @@ -52,7 +52,7 @@ hakyllWithExitCode conf rules = do case args'' of Build -> Commands.build conf logger rules - Check _ -> Commands.check conf logger check' >> ok + Check _ -> Commands.check conf logger check' Clean -> Commands.clean conf logger >> ok Deploy -> Commands.deploy conf Preview p -> Commands.preview conf logger rules p >> ok |