azurify 0.4.0.2 → 0.4.0.3
raw patch · 3 files changed
+2/−8 lines, 3 filesdep −filepathPVP ok
version bump matches the API change (PVP)
Dependencies removed: filepath
API changes (from Hackage documentation)
Files
- Azure.hs +1/−4
- Azure/BlobDataTypes.hs +0/−1
- azurify.cabal +1/−3
Azure.hs view
@@ -258,7 +258,7 @@ let headers = ("x-ms-version", "2011-08-18") : ("x-ms-date", now) : extraHeaders ++ requestHeaders initReq- let getHeader hdr = listToMaybe $ map snd $ filter (\(a,b) -> a == hdr) headers+ let getHeader hdr = listToMaybe $ map snd $ filter (\(a,_) -> a == hdr) headers let signData = defaultSignData { verb = reqType , contentLength = if reqType `elem` ["PUT", "DELETE"] || not (B.null reqBody) then B8.pack $ show $ B.length reqBody else "" , canonicalizedHeaders = canonicalizeHeaders headers@@ -284,9 +284,6 @@ encodeParams :: [(B.ByteString, B.ByteString)] -> B.ByteString encodeParams = renderQuery True . simpleQueryToQuery--liftToString :: (String -> String) -> B8.ByteString -> B8.ByteString-liftToString f = B8.pack . f . B8.unpack canonicalizeHeaders :: [Header] -> B.ByteString canonicalizeHeaders headers = B.intercalate "\n" unfoldHeaders
Azure/BlobDataTypes.hs view
@@ -3,7 +3,6 @@ import qualified Data.ByteString as B import Data.Text (Text) import Data.Default-import System.FilePath (FilePath) data AccessControl = ContainerPublic -- ^ the container can be enumerated and all blobs can be read by anonymous users | BlobPublic -- ^ blobs can be read by anonymous users, but the container cannot be enumerated
azurify.cabal view
@@ -1,5 +1,5 @@ name: azurify-version: 0.4.0.2+version: 0.4.0.3 synopsis: A simple library for accessing Azure blob storage description: An interface for a few basic functions of the Microsoft Azure blob storage. Creating and deleting containers as well as uploading, downloading and breaking leases of blobs is supported. homepage: http://arnovanlumig.com/azure@@ -60,7 +60,6 @@ case-insensitive >= 0.4.0.1, utf8-string >= 0.3.7, old-locale >= 1.0.0.4,- filepath, unix-compat if !flag(no-hxt)@@ -101,7 +100,6 @@ utf8-string >= 0.3.7, cmdargs >= 0.10, directory >= 1.1.0.2,- filepath, unix-compat if !flag(no-hxt)