Merge pull request #63 from haskell-servant/docs-exports

add missing exports (lenses) to servant-docs's Servant.Docs module

servant-docs/src/Servant/Docs.hs

@@ -155,11 +155,11 @@ module Servant.Docs
   , -- * ADTs to represent an 'API'
     Method(..)
   , Endpoint, path, method, defEndpoint
-  , API, emptyAPI
+  , API, apiIntros, apiEndpoints, emptyAPI
   , DocCapture(..), capSymbol, capDesc
   , DocQueryParam(..), ParamKind(..), paramName, paramValues, paramDesc, paramKind
   , DocNote(..), noteTitle, noteBody
-  , DocIntro(..)
+  , DocIntro(..), introTitle, introBody
   , Response(..), respStatus, respTypes, respBody, defResponse
   , Action, captures, headers, notes, params, rqtypes, rqbody, response, defAction
   , single

servant-docs/src/Servant/Docs/Internal.hs

@@ -495,7 +495,7 @@ markdown api = unlines $
 
         introStr :: DocIntro -> [String]
         introStr i =
-            ("#### " ++ i ^. introTitle) :
+            ("## " ++ i ^. introTitle) :
             "" :
             intersperse "" (i ^. introBody) ++
             "" :