diff options
Diffstat (limited to 'src/Hakyll/Check.hs')
| -rw-r--r-- | src/Hakyll/Check.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 -------------------------------------------------------------------------------- |