1 import Test
.Cabal
.Prelude
2 import System
.Directory
5 cwd
<- fmap testCurrentDir getTestEnv
6 liftIO
$ createDirectoryIfMissing
False $ cwd
</> "lists"
7 cabal
"v2-sdist" ["all", "--list-only", "--output-dir", "lists"]
8 assertFindInFile
(normalise
"a/a.cabal") (cwd
</> "lists/a-0.1.list")
9 assertFindInFile
(normalise
"b/b.cabal") (cwd
</> "lists/b-0.1.list")