git.iko.soy/typeable/servant
on master help sign in
put intro titles at the same level as the endpoints
b6f7efeAlp Mestanogullari
servant-docs/src/Servant/Docs/Internal.hs+1−1
@@ -495,7 +495,7 @@ markdown api = unlines $
495
495
496 introStr :: DocIntro -> [String]
496 introStr :: DocIntro -> [String]
497 introStr i =
497 introStr i =
498− ("#### " ++ i ^. introTitle) :
498+ ("## " ++ i ^. introTitle) :
499 "" :
499 "" :
500 intersperse "" (i ^. introBody) ++
500 intersperse "" (i ^. introBody) ++
501 "" :
501 "" :