put intro titles at the same level as the endpoints

2015-05-09 16:28:19 +02:00 · 2015-05-09 16:28:19 +02:00 · b6f7efe8e2
commit b6f7efe8e2
parent c2211e9534
1 changed files with 1 additions and 1 deletions
--- a/servant-docs/src/Servant/Docs/Internal.hs
+++ b/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) ++
            "" :