Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

LaTeX writer: minor tweak to hypertarget (semantically irrelevant).

Browse source
This commit is contained in:
John MacFarlane 2017-03-02 11:53:17 +01:00
parent a69cfa0178
commit 9e50319df3
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Text/Pandoc/Writers/LaTeX.hs
View file

@ -841,7 +841,9 @@ hypertarget addnewline ident x = do
ref <- text `fmap` toLabel ident ref <- text `fmap` toLabel ident
return $ text "\\hypertarget" return $ text "\\hypertarget"
<> braces ref <> braces ref
<> braces ((if addnewline then ("%" <> cr) else empty) <> x) <> braces ((if addnewline && not (isEmpty x)
then ("%" <> cr)
else empty) <> x)
labelFor :: PandocMonad m => String -> LW m Doc labelFor :: PandocMonad m => String -> LW m Doc
labelFor "" = return empty labelFor "" = return empty