cabal-testsuite/PackageTests/Init/init-interactive-legacy.test.hs

   1 import Test.Cabal.Prelude
   2
   3 main = cabalTest $
   4   withSourceCopyDir "app" $ do
   5     cwd <- fmap testSourceCopyDir getTestEnv
   6
   7     buildOut <- withDirectory cwd $ do
   8       cabalWithStdin "init" ["-i"]
   9         "2\n\n1\n\n\n10\n\n\n\n\n\n\n\n\n\n"
  10       setup "configure" []
  11       setup' "build" ["app"]
  12
  13     assertFileDoesContain    (cwd </> "app.cabal")   "1.24"
  14     assertFileDoesContain    (cwd </> "app.cabal")   "BSD3"
  15     assertFileDoesContain    (cwd </> "app.cabal")   "Simple"
  16     assertFileDoesNotContain (cwd </> "app.cabal")   "^>="
  17     assertFileDoesContain    (cwd </> "app/Main.hs") "This should remain as is!"
  18     assertOutputContains "Linking" buildOut