LaTeX writer: remove unused local bind

This commit is contained in:
Alexander Krotov 2018-11-01 13:38:20 +03:00
parent 512732db7b
commit 5cffd6bc77

View file

@ -1276,7 +1276,7 @@ inlineToLaTeX (Note contents) = do
-- or the closing delimiter gets swallowed.
handleMathComment :: String -> String
handleMathComment s =
let (xs, ys) = break (\c -> c == '\n' || c == '%') $ reverse s
let (_, ys) = break (\c -> c == '\n' || c == '%') $ reverse s
in case ys of
'%':'\\':_ -> s
'%':_ -> s ++ "\n"