We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 409208f + 41425f3 commit 8a5a331Copy full SHA for 8a5a331
cabal-testsuite/src/Test/Cabal/Prelude.hs
@@ -785,7 +785,7 @@ shouldDirectoryExist path =
785
shouldDirectoryNotExist :: MonadIO m => WithCallStack (FilePath -> m ())
786
shouldDirectoryNotExist path =
787
withFrozenCallStack $
788
- liftIO $ doesDirectoryExist path >>= assertBool (path ++ " should exist") . not
+ liftIO $ doesDirectoryExist path >>= assertBool (path ++ " should not exist") . not
789
790
assertRegex :: MonadIO m => String -> String -> Result -> m ()
791
assertRegex msg regex r =
0 commit comments