LaTeX writer: use % after hypertarget before code block

jgm · Mar 2, 2017 · 8709b7c · 8709b7c
1 parent 9e50319
commit 8709b7c
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -490,7 +490,10 @@ blockToLaTeX (BlockQuote lst) = do
 blockToLaTeX (CodeBlock (identifier,classes,keyvalAttr) str) = do
   opts <- gets stOptions
   lab <- labelFor identifier
-  linkAnchor <- hypertarget True identifier lab
+  linkAnchor' <- hypertarget True identifier lab
+  let linkAnchor = if isEmpty linkAnchor'
+                      then empty
+                      else linkAnchor' <> "%"
   let lhsCodeBlock = do
         modify $ \s -> s{ stLHS = True }
         return $ flush (linkAnchor $$ "\\begin{code}" $$ text str $$