servant-static-th 0.2.2.1 → 0.2.3.0
raw patch · 3 files changed
+13/−6 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
CHANGELOG.md view
@@ -1,5 +1,11 @@ # Changelog +## v0.2.3.0++- Add a mime type for .map files+ [#15](https://github.com/cdepillabout/servant-static-th/pull/15). Thanks+ [@spencertipping](https://github.com/spencertipping)!+ ## v0.2.2.1 - Update haddocks with a note to use `extra-source-files` in your `.cabal`
servant-static-th.cabal view
@@ -1,5 +1,5 @@ name: servant-static-th-version: 0.2.2.1+version: 0.2.3.0 synopsis: Embed a directory of static files in your Servant server description: Please see <https://github.com/cdepillabout/servant-static-th#readme README.md>. homepage: https://github.com/cdepillabout/servant-static-th
src/Servant/Static/TH/Internal/Mime.hs view
@@ -91,23 +91,24 @@ extensionMimeTypeMap :: Map String MimeTypeInfo extensionMimeTypeMap = [ ("css", MimeTypeInfo [t|CSS|] [t|ByteString|] byteStringToExp)+ , ("eot", MimeTypeInfo [t|EOT|] [t|ByteString|] byteStringToExp)+ , ("gexf", MimeTypeInfo [t|GEXF|] [t|ByteString|] byteStringToExp) , ("gif", MimeTypeInfo [t|GIF|] [t|ByteString|] byteStringToExp) , ("htm", MimeTypeInfo [t|HTML|] [t|Html|] htmlToExp) , ("html", MimeTypeInfo [t|HTML|] [t|Html|] htmlToExp)+ , ("ico", MimeTypeInfo [t|ICO|] [t|ByteString|] byteStringToExp) , ("jpeg", MimeTypeInfo [t|JPEG|] [t|ByteString|] byteStringToExp) , ("jpg", MimeTypeInfo [t|JPEG|] [t|ByteString|] byteStringToExp)- , ("ico", MimeTypeInfo [t|ICO|] [t|ByteString|] byteStringToExp) , ("js", MimeTypeInfo [t|JS|] [t|ByteString|] byteStringToExp)+ , ("json", MimeTypeInfo [t|JSON|] [t|ByteString|] byteStringToExp)+ , ("map", MimeTypeInfo [t|JSON|] [t|ByteString|] byteStringToExp) , ("png", MimeTypeInfo [t|PNG|] [t|ByteString|] byteStringToExp) , ("svg", MimeTypeInfo [t|SVG|] [t|ByteString|] byteStringToExp)- , ("txt", MimeTypeInfo [t|TXT|] [t|ByteString|] byteStringToExp)- , ("eot", MimeTypeInfo [t|EOT|] [t|ByteString|] byteStringToExp) , ("ttf", MimeTypeInfo [t|TTF|] [t|ByteString|] byteStringToExp)+ , ("txt", MimeTypeInfo [t|TXT|] [t|ByteString|] byteStringToExp) , ("woff", MimeTypeInfo [t|WOFF|] [t|ByteString|] byteStringToExp) , ("woff2",MimeTypeInfo [t|WOFF2|][t|ByteString|] byteStringToExp)- , ("json", MimeTypeInfo [t|JSON|] [t|ByteString|] byteStringToExp) , ("xml", MimeTypeInfo [t|XML|] [t|ByteString|] byteStringToExp)- , ("gexf", MimeTypeInfo [t|GEXF|] [t|ByteString|] byteStringToExp) ] -- | Just like 'extensionToMimeTypeInfo', but throw an error using 'fail' if