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

   1 import Test.Cabal.Prelude
   2
   3 main = cabalTest $ do
   4     cwd <- fmap testCurrentDir getTestEnv
   5
   6     buildOut <- withDirectory cwd $ do
   7       cabalWithStdin "init" ["-i", "-p", "app"]
   8         "2\n\n5\n\n\n\n\n\n\n\n\n\n\n\n\n"
   9       setup "configure" []
  10       setup' "build" ["app"]
  11
  12     assertFileDoesContain (cwd </> "app.cabal")   "3.0"
  13     assertFileDoesContain (cwd </> "app.cabal")   "BSD-3-Clause"
  14     assertFileDoesContain (cwd </> "app.cabal")   "Simple"
  15     assertFileDoesContain (cwd </> "app/Main.hs") "This should remain as is!"
  16     assertOutputContains "Linking" buildOut