@@ -3,7 +3,9 @@
33{-# LANGUAGE DeriveFunctor #-}
44{-# LANGUAGE PolyKinds #-}
55{-# OPTIONS_HADDOCK not-home #-}
6−module Servant.API.Header where
6+module Servant.API.Header (
7+ Header(..),
8+) where
79
810import Data.ByteString (ByteString)
911import Data.Typeable (Typeable)
@@ -25,5 +27,3 @@ data Header (sym :: Symbol) a = Header a
2527-- >>> import Servant.API
2628-- >>> import Data.Aeson
2729-- >>> import Data.Text
28−-- >>> data Book
29−-- >>> instance ToJSON Book where { toJSON = undefined }