Skip to content

Commit 72c0466

Browse files
committed
Adds three more MIME types
A simple commit adding three more MIME types: - `application/x-www-url-encoded` - `multipart/form-data` - `text/plain`
1 parent 1be13a4 commit 72c0466

File tree

1 file changed

+21
-0
lines changed

1 file changed

+21
-0
lines changed

src/Orb/Response/ContentType.hs

Lines changed: 21 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -13,6 +13,7 @@ module Orb.Response.ContentType
1313
, applicationXRarCompressed
1414
, applicationXSh
1515
, applicationXTar
16+
, applicationXWwwFormUrlencoded
1617
, applicationXhtmlXml
1718
, applicationXml
1819
, applicationZip
@@ -29,11 +30,13 @@ module Orb.Response.ContentType
2930
, imageTiff
3031
, imageWebp
3132
, imageXIcon
33+
, multipartFormData
3234
, textCalendar
3335
, textCss
3436
, textCsv
3537
, textHtml
3638
, textJavascript
39+
, textPlain
3740
, videoMpeg
3841
, videoWebm
3942
, videoXMsvideo
@@ -123,6 +126,12 @@ applicationXSh = BS8.pack "application/x-sh"
123126
applicationXTar :: ContentType
124127
applicationXTar = BS8.pack "application/x-tar"
125128

129+
{- | A 'BS.ByteString' representation of the
130+
/application\/x-www-form-urlencoded/ MIME type (HTML form data).
131+
-}
132+
applicationXWwwFormUrlencoded :: ContentType
133+
applicationXWwwFormUrlencoded = BS8.pack "application/x-www-form-urlencoded"
134+
126135
{- | A 'BS.ByteString' representation of the /application\/xhtml+xml/ MIME type
127136
(XHTML documents).
128137
-}
@@ -219,6 +228,12 @@ icons).
219228
imageXIcon :: ContentType
220229
imageXIcon = BS8.pack "image/x-icon"
221230

231+
{- | A 'BS.ByteString' representation of the /multipart\/form-data/ MIME type
232+
(HTML form data).
233+
-}
234+
multipartFormData :: ContentType
235+
multipartFormData = BS8.pack "multipart/form-data"
236+
222237
{- | A 'BS.ByteString' representation of the /text\/calendar/ MIME type (.ics
223238
calendar files).
224239
-}
@@ -249,6 +264,12 @@ scripts).
249264
textJavascript :: ContentType
250265
textJavascript = BS8.pack "text/javascript"
251266

267+
{- | A 'BS.ByteString' representation of the /text\/plain/ MIME type (plain
268+
text).
269+
-}
270+
textPlain :: ContentType
271+
textPlain = BS8.pack "text/plain"
272+
252273
{- | A 'BS.ByteString' representation of the /video\/mpeg/ MIME type (.mpeg or
253274
.mpg videos).
254275
-}

0 commit comments

Comments
 (0)