Fix test suite

This commit is contained in:
Michael Snoyman 2014-12-22 11:08:52 +02:00
parent cc3338de9e
commit 06d70e4ee4
2 changed files with 7 additions and 3 deletions

View File

@ -1,5 +1,5 @@
name: stackage
version: 0.2.1.2
version: 0.2.1.3
synopsis: "Stable Hackage," tools for creating a vetted set of packages from Hackage.
description: Please see <http://www.stackage.org/package/stackage> for a description and documentation.
homepage: https://github.com/fpco/stackage
@ -87,6 +87,8 @@ test-suite spec
, Cabal
, yaml
, containers
, http-client
, http-client-tls
source-repository head
type: git

View File

@ -9,10 +9,12 @@ import Test.Hspec
import qualified Data.Yaml as Y
import Distribution.Version (anyVersion)
import qualified Data.Map as Map
import Network.HTTP.Client (withManager)
import Network.HTTP.Client.TLS (tlsManagerSettings)
spec :: Spec
spec = it "works" $ do
bc <- defaultBuildConstraints (error "manager should not be used")
spec = it "works" $ withManager tlsManagerSettings $ \man -> do
bc <- defaultBuildConstraints man
bp <- newBuildPlan bc
let bs = Y.encode bp
ebp' = Y.decodeEither bs