From 21585c18f320faf994b8ebf4ad1cccb302096eec Mon Sep 17 00:00:00 2001 From: Andres Loeh Date: Tue, 11 Feb 2014 11:07:43 +0100 Subject: hakyll check: return exit code of 0 on success The old test returns an exit code of 1 whenever the number of errors is >= 0, which should always be the case. The fix replaces this with a test whether the number of errors is strictly > 0. --- src/Hakyll/Check.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Hakyll/Check.hs b/src/Hakyll/Check.hs index 6d345de..cfd30e4 100644 --- a/src/Hakyll/Check.hs +++ b/src/Hakyll/Check.hs @@ -57,7 +57,7 @@ data Check = All | InternalLinks check :: Configuration -> Verbosity -> Check -> IO ExitCode check config verbosity check' = do ((), write) <- runChecker checkDestination config verbosity check' - return $ if checkerFaulty write >= 0 then ExitFailure 1 else ExitSuccess + return $ if checkerFaulty write > 0 then ExitFailure 1 else ExitSuccess -------------------------------------------------------------------------------- -- cgit v1.2.3