on master help sign in
fix haddocks for Servant.API.Header (fixes #491)
ff4fb00Sönke Hahn
servant/src/Servant/API/Header.hs+3−3
@@ -3,7 +3,9 @@
3{-# LANGUAGE DeriveFunctor #-}
3{-# LANGUAGE DeriveFunctor #-}
4{-# LANGUAGE PolyKinds #-}
4{-# LANGUAGE PolyKinds #-}
5{-# OPTIONS_HADDOCK not-home #-}
5{-# OPTIONS_HADDOCK not-home #-}
6−module Servant.API.Header where
6+module Servant.API.Header (
7+ Header(..),
8+) where
7
9
8import Data.ByteString (ByteString)
10import Data.ByteString (ByteString)
9import Data.Typeable (Typeable)
11import Data.Typeable (Typeable)
@@ -25,5 +27,3 @@ data Header (sym :: Symbol) a = Header a
25-- >>> import Servant.API
27-- >>> import Servant.API
26-- >>> import Data.Aeson
28-- >>> import Data.Aeson
27-- >>> import Data.Text
29-- >>> import Data.Text
28−-- >>> data Book
29−-- >>> instance ToJSON Book where { toJSON = undefined }