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

2026-08-26 10:16:32 +00:00 · 2017-03-02 11:53:31 +01:00
parent a69cfa0178
commit 9e50319df3
1 changed files with 3 additions and 1 deletions
@@ -841,7 +841,9 @@ hypertarget addnewline ident x = do
  ref <- text `fmap` toLabel ident
  return $ text "\\hypertarget"
              <> 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 ""    = return empty