diff options
| -rw-r--r-- | tests/Spec.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/Spec.hs b/tests/Spec.hs index 1294dd8..c8a6be6 100644 --- a/tests/Spec.hs +++ b/tests/Spec.hs @@ -64,7 +64,7 @@ main = do rvs <- mapM compilePrivatePkgDb cabalVers if any isLeft' rvs - then exitFailure + then print rvs >> exitFailure else exitSuccess where isLeft' (Left _) = True |