eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

put intro titles at the same level as the endpoints

Browse source
This commit is contained in:
Alp Mestanogullari 2015-05-09 16:28:19 +02:00
parent c2211e9534
commit b6f7efe8e2
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
servant-docs/src/Servant/Docs/Internal.hs
View file

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