3 , GeneralizedNewtypeDeriving
5 module Network.HTTP.Lucu.MIMEParams.Internal
9 import Data.Ascii (CIAscii)
10 import qualified Data.Map as M (Map)
12 import Data.Text (Text)
14 import Language.Haskell.TH.Syntax
15 import Network.HTTP.Lucu.OrphanInstances ()
17 -- |A 'Map' from MIME parameter attributes to values. Attributes are
18 -- always case-insensitive according to RFC 2045
19 -- (<http://tools.ietf.org/html/rfc2045#section-5.1>).
21 = MIMEParams (M.Map CIAscii Text)
22 deriving (Eq, Show, Read, Lift, Monoid, Typeable)