From 7c0a90bd7d012296eefbe2bfb07327752654b37c Mon Sep 17 00:00:00 2001 From: Sigbjorn Finne Date: Sat, 31 Jan 2009 08:27:34 -0800 Subject: haddock additions --- Codec/MIME/Type.hs | 28 +++++++++++++++------------- 1 file changed, 15 insertions(+), 13 deletions(-) (limited to 'Codec/MIME/Type.hs') diff --git a/Codec/MIME/Type.hs b/Codec/MIME/Type.hs index ab16ab7..998c6b0 100644 --- a/Codec/MIME/Type.hs +++ b/Codec/MIME/Type.hs @@ -1,16 +1,17 @@ -{- | - - Module : Codec.MIME.Type - Copyright : (c) 2006-2008, Galois Inc. -- License : BSD3 - - Maintainer : Sigbjorn Finne - Stability : unstable - Portability : GHC - - Representing MIME types and values. --} - +-------------------------------------------------------------------- +-- | +-- Module : Codec.MIME.Type +-- Copyright : (c) 2006-2009, Galois, Inc. +-- License : BSD3 +-- +-- Maintainer: Sigbjorn Finne +-- Stability : provisional +-- Portability: portable +-- +-- +-- Representing MIME types and values. +-- +-------------------------------------------------------------------- module Codec.MIME.Type where import Data.List ( concatMap, isSuffixOf ) @@ -21,6 +22,7 @@ data Type , mimeParams :: [(String,String)] } deriving ( Show, Ord, Eq ) +-- | The @null@ MIME record type value; currently a @text/plain@. nullType :: Type nullType = Type { mimeType = Text "plain" -- cgit v1.2.3