cabal-testsuite/PackageTests/Init/init-interactive.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\n5\n\n\n2\n\n\n\n\n\n\n\n\n\n"
  10       setup "configure" []
  11       setup' "build" ["app"]
  12
  13     assertFileDoesContain (cwd </> "app.cabal")   "3.0"
  14     assertFileDoesContain (cwd </> "app.cabal")   "BSD-3-Clause"
  15     assertFileDoesContain (cwd </> "app.cabal")   "Simple"
  16     assertFileDoesContain (cwd </> "app/Main.hs") "This should remain as is!"
  17     assertOutputContains "Linking" buildOut