hack2-contrib 2013.6.16 → 2013.6.22
raw patch · 2 files changed
+3/−3 lines, 2 filesdep ~airPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: air
API changes (from Hackage documentation)
Files
hack2-contrib.cabal view
@@ -1,5 +1,5 @@ Name: hack2-contrib-Version: 2013.6.16+Version: 2013.6.22 Build-type: Simple Synopsis: Hack2 contrib Description: Common middlewares and utilities for Hack2@@ -27,7 +27,7 @@ , bytestring , data-default , time- , air+ , air >= 2013.6.22 , hack2 , utf8-string
src/Hack2/Contrib/Middleware/UserMime.hs view
@@ -14,7 +14,7 @@ user_mime :: [(ByteString, ByteString)] -> Middleware user_mime h app env = do r <- app env- case h.only_fst.find mime >>= flip lookup h of+ case h.map fst.find mime >>= flip lookup h of Nothing -> return r Just v -> return - r.set_content_type v where mime x = env.path_info.B.unpack.ends_with ('.' : x.B.unpack)