From 8d313544fe3c73b84ff9f0818cfa5857699cf533 Mon Sep 17 00:00:00 2001 From: Lennart Spitzner Date: Fri, 12 Aug 2016 15:33:45 +0200 Subject: [PATCH] Update Showcase.md --- Showcase.md | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/Showcase.md b/Showcase.md index 61119a8..855c35a 100644 --- a/Showcase.md +++ b/Showcase.md @@ -132,9 +132,8 @@ layoutBriDoc ast briDoc = do state' <- MultiRWSS.withMultiStateS state $ layoutBriDocM briDoc' - let remainingComments = - Map.elems (_lstate_commentsPrior state') - ++ Map.elems (_lstate_commentsPost state') + let remainingComments = Map.elems (_lstate_commentsPrior state') + ++ Map.elems (_lstate_commentsPost state') remainingComments `forM_` (mTell . (:[]) . LayoutErrorUnusedComment . show . fmap fst)