Remove space after opening parenthesis (fixes #87)

2017-12-28 20:46:03 +01:00 · 2017-12-28 20:46:03 +01:00 · 43abab2dd2
parent 96b3a3ab93
commit 43abab2dd2
3 changed files with 4 additions and 4 deletions
--- a/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
+++ b/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
@ -327,7 +327,7 @@ layoutExpr lexpr@(L _ expr) = do
          ]
        , docSetBaseY $ docLines
          [ docCols ColOpPrefix
-            [ docParenLSep
+            [ docLit $ Text.pack "("
            , docAddBaseY (BrIndentSpecial 2) innerExpDoc
            ]
          , docLit $ Text.pack ")"