Remove unneeded module

src/Servant/API/ContentTypes.hs

@@ -11,12 +11,11 @@
 {-# LANGUAGE UndecidableInstances #-}
 module Servant.API.ContentTypes where
 
-import           Data.Typeable
-
 import           Control.Monad           (join)
 import qualified Data.ByteString         as BS
 import           Data.ByteString.Lazy    (ByteString)
 import           Data.String.Conversions (cs)
+import           Data.Typeable
 import           GHC.Exts                (Constraint)
 import qualified Network.HTTP.Media      as M
 

src/Servant/API/ContentTypes/HTML.hs

@@ -1,4 +0,0 @@
-module Servant.API.ContentTypes.HTML where
-
-data HTML
-    deriving Typeable

src/Servant/Utils/Links.hs

@@ -20,7 +20,7 @@
 -- >>>
 -- >>>
 -- >>>
--- >>> type Hello = "hello" :> Get Int
+-- >>> type Hello = "hello" :> Get '[JSON] Int
 -- >>> type Bye   = "bye"   :> QueryParam "name" String :> Delete
 -- >>> type API   = Hello :<|> Bye
 -- >>> let api = Proxy :: Proxy API
@@ -40,7 +40,7 @@
 -- function that accepts that input and generates a link. This is best shown
 -- with an example. Here, a link is generated with no parameters:
 --
--- >>> let hello = Proxy :: Proxy ("hello" :> Get Int)
+-- >>> let hello = Proxy :: Proxy ("hello" :> Get '[JSON] Int)
 -- >>> print (safeLink api hello :: URI)
 -- hello
 --
@@ -74,7 +74,7 @@
 -- <BLANKLINE>
 -- <interactive>:64:1:
 --     Could not deduce (Or
---                         (IsElem' Delete (Get Int))
+--                         (IsElem' Delete (Get '[JSON] Int))
 --                         (IsElem'
 --                            ("hello" :> Delete)
 --                            ("bye" :> (QueryParam "name" String :> Delete))))