yesod-static 1.0.0.2 → 1.0.0.3

raw patch · 2 files changed

+2/−3 lines, 2 filesnew-uploader

Files

• Yesod/Static.hs +1/−2
• yesod-static.cabal +1/−1

@@ -66,7 +66,6 @@ import qualified Data.ByteString.Lazy as L import qualified Data.Serialize import Data.Text (Text, pack)-import Data.Monoid (mempty) import qualified Data.Map as M import Data.IORef (readIORef, newIORef, writeIORef) import Network.Wai (pathInfo, rawPathInfo, responseLBS)@@ -307,7 +306,7 @@         pack' <- [|pack|]         qs <- if makeHash                     then do hash <- qRunIO $ base64md5File $ pathFromRawPieces fp f-                            [|[(pack $(lift hash), mempty)]|]+                            [|[("etag" :: Text, pack $(lift hash))]|]                     else return $ ListE []         return             [ SigD routeName $ ConT route

@@ -1,5 +1,5 @@ name:            yesod-static-version:         1.0.0.2+version:         1.0.0.3 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>