amazonka-core 1.2.0 → 1.2.0.1

raw patch · 2 files changed

+34/−1 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• amazonka-core.cabal +2/−1
• test/Test/AWS/Data/Path.hs +32/−0

@@ -1,5 +1,5 @@ name:                  amazonka-core-version:               1.2.0+version:               1.2.0.1 synopsis:              Core data types and functionality for Amazonka libraries. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -118,6 +118,7 @@         , Test.AWS.Data.List         , Test.AWS.Data.Maybe         , Test.AWS.Data.Numeric+        , Test.AWS.Data.Path         , Test.AWS.Data.Time         , Test.AWS.Error         , Test.AWS.Sign.V4

@@ -0,0 +1,32 @@+{-# LANGUAGE OverloadedStrings #-}++-- |+-- Module      : Test.AWS.Data.Path+-- Copyright   : (c) 2013-2015 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : experimental+-- Portability : non-portable (GHC extensions)+--+module Test.AWS.Data.Path (tests) where++import           Network.AWS.Prelude+import           Test.Tasty+import           Test.Tasty.HUnit++tests :: TestTree+tests = testGroup "path"+    [ testGroup "encode"+        [ testCase "doesn't append trailing slash" $+            let x = "/path/without/trailing/slash" in encode x @?= x++        , testCase "preserves trailing slash" $+            let x = "/some/path/with/trailing/slash/" in encode x @?= x++        , testCase "preserves adjacent slashes" $+            let x = "/path//with/adjacent///slahes/" in encode x @?= x+        ]+    ]++encode :: ByteString -> ByteString+encode = toBS . escapePath . rawPath