diff --git a/servant-docs/src/Servant/Docs/Internal.hs b/servant-docs/src/Servant/Docs/Internal.hs
index f0e18456..c1e5b724 100644
--- 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) ++
             "" :