git.iko.soy/typeable/servant
on master help sign in
Improve authStr in markdown
commit1ba7624e698c63e19e660094dd90243bc652000a authorishiy <y.ishihara.1993@gmail.com> dateThu 29 Jun 2017, 19:01 (9 years ago) parent70aae4c
1 file changed+1
servant-docs/src/Servant/Docs/Internal.hs+1
servant-docs/src/Servant/Docs/Internal.hs+1
@@ -561,6 +561,7 @@ markdown api = unlines $
561561
562562
563563 authStr :: [DocAuthentication] -> [String]
564+ authStr [] = []
564565 authStr auths =
565566 let authIntros = mapped %~ view authIntro $ auths
566567 clientInfos = mapped %~ view authDataRequired $ auths