diff options
author | Justin Bedo <cu@cua0.org> | 2022-02-13 08:09:39 +1100 |
---|---|---|
committer | Justin Bedo <cu@cua0.org> | 2022-02-13 08:09:39 +1100 |
commit | 3c265bb513f9c10a106c06e86a01c5b67b680d40 (patch) | |
tree | 0583a00055f07310143189108a595cb14261d985 | |
parent | cca7a01d0f83b61f12491db0923e502c5650b918 (diff) |
No space after (
-rw-r--r-- | latexfmt.hs | 1 |
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 |