Skip to content

Commit

Permalink
Skip empty module comments
Browse files Browse the repository at this point in the history
  • Loading branch information
garyb committed Feb 24, 2015
1 parent 98e7e3d commit 1f1f40f
Showing 1 changed file with 3 additions and 2 deletions.
5 changes: 3 additions & 2 deletions psc-docs/Main.hs
Original file line number Diff line number Diff line change
Expand Up @@ -89,8 +89,9 @@ renderModule :: P.Module -> Docs
renderModule mdl@(P.Module coms moduleName _ exps) = do
headerLevel 2 $ "Module " ++ P.runModuleName moduleName
spacer
renderComments coms
spacer
unless (null coms) $ do
renderComments coms
spacer
renderTopLevel exps (P.exportedDeclarations mdl)
spacer

Expand Down

0 comments on commit 1f1f40f

Please sign in to comment.