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