aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--latexfmt.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/latexfmt.hs b/latexfmt.hs
index c1ecfe1..b7473ce 100644
--- a/latexfmt.hs
+++ b/latexfmt.hs
@@ -23,6 +23,7 @@ toStr (Wrd w) = do
if T.length w >= 1 && T.head w `elem` (".,;:!?)" :: [Char])
then print' w
else print w
+ when (w == "(") suppress
when (T.last w == '.') printnl
toStr (Cmd c) = if T.length c > 0 && isCtrl (T.head c)
then print' $ "\\" `T.append` c