happstack-server 6.2.2 → 6.2.3

raw patch · 2 files changed

+3/−3 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• happstack-server.cabal +1/−1
• src/Happstack/Server/FileServe/BuildingBlocks.hs +2/−2

@@ -1,5 +1,5 @@ Name:                happstack-server-Version:             6.2.2+Version:             6.2.3 Synopsis:            Web related tools and services. Description:         Happstack Server provides an HTTP server and a rich set of functions for routing requests, handling query parameters, generating responses, working with cookies, serving files, and more. For in-depth documentation see the Happstack Crash Course <http://happstack.com/docs/crashcourse/index.html> License:             BSD3

@@ -173,9 +173,9 @@                  -> Integer -- ^ offset into Handle                  -> Integer -- ^ number of bytes to send                  -> Response-sendFileResponse ct filePath mModTime _offset count =+sendFileResponse ct filePath mModTime offset count =     let res = ((setHeader "Content-Type" ct) $ -               (SendFile 200 Map.empty (nullRsFlags { rsfLength = ContentLength }) Nothing filePath 0 count)+               (SendFile 200 Map.empty (nullRsFlags { rsfLength = ContentLength }) Nothing filePath offset count)               )     in case mModTime of          Nothing -> res