diff --git a/test/Data/YamlSpec.hs b/test/Data/YamlSpec.hs index 0a5df70..12028f1 100644 --- a/test/Data/YamlSpec.hs +++ b/test/Data/YamlSpec.hs @@ -19,6 +19,7 @@ import Control.Monad import Control.Exception (try, SomeException) import Test.Hspec import Data.Either.Compat +import System.Directory (createDirectory) import Test.Mockery.Directory import qualified Data.Yaml as D @@ -322,6 +323,7 @@ caseEncodeDecodeNonAsciiFileData :: Assertion caseEncodeDecodeNonAsciiFileData = do let mySample = (object ["foo" .= True]) inTempDirectory $ do + createDirectory "accenté" D.encodeFile "accenté/bar.yaml" mySample out1 <- D.decodeFile "accenté/bar.yaml" out1 @?= Just mySample diff --git a/yaml.cabal b/yaml.cabal index 9fef7de..365d16b 100644 --- a/yaml.cabal +++ b/yaml.cabal @@ -131,6 +131,7 @@ test-suite spec , text , aeson >= 0.7 , unordered-containers + , directory , vector , resourcet , aeson-qq