Merge pull request #221 from kosmikus/check-exit-code-fix
hakyll check: return exit code of 0 on success
commitfd889c563a884283b1291b3c44367f5ef6b13439
authorJasper Van der Jeugt <jaspervdj@gmail.com>
dateTue 11 Feb 2014, 13:32 (13 years ago)
parent5ab965521585c1
src/Hakyll/Check.hs+1−1
@@ -57,7 +57,7 @@ data Check = All | InternalLinks
5757check :: Configuration -> Verbosity -> Check -> IO ExitCode
5858check config verbosity check' = do
5959 ((), write) <- runChecker checkDestination config verbosity check'
60− return $ if checkerFaulty write >= 0 then ExitFailure 1 else ExitSuccess
60+ return $ if checkerFaulty write > 0 then ExitFailure 1 else ExitSuccess
6161
6262
6363--------------------------------------------------------------------------------