From 7726b69cd351b890b299402450f8d14747f0898a Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Wed, 24 Nov 2021 14:47:00 -0800
Subject: LaTeX reader: omit visible content for `\label{...}`.

Previously we included the text of the label in square brackets,
but this is undesirable in many cases.

See discussion in
<https://github.com/jgm/pandoc/issues/813#issuecomment-978232426>.
---
 src/Text/Pandoc/Readers/LaTeX/Inline.hs | 3 +--
 test/command/refs.md                    | 4 +---
 2 files changed, 2 insertions(+), 5 deletions(-)

diff --git a/src/Text/Pandoc/Readers/LaTeX/Inline.hs b/src/Text/Pandoc/Readers/LaTeX/Inline.hs
index 0b49fd6c3..5938096fd 100644
--- a/src/Text/Pandoc/Readers/LaTeX/Inline.hs
+++ b/src/Text/Pandoc/Readers/LaTeX/Inline.hs
@@ -56,8 +56,7 @@ dolabel = do
   let refstr = untokenize v
   updateState $ \st ->
     st{ sLastLabel = Just refstr }
-  return $ spanWith (refstr,[],[("label", refstr)])
-    $ inBrackets $ str $ untokenize v
+  return $ spanWith (refstr,[],[("label", refstr)]) mempty
 
 doref :: PandocMonad m => Text -> LP m Inlines
 doref cls = do
diff --git a/test/command/refs.md b/test/command/refs.md
index 34e51d219..c6457be4c 100644
--- a/test/command/refs.md
+++ b/test/command/refs.md
@@ -287,9 +287,7 @@ Figure \ref{fig:Logo3} illustrated the SVG logo
 \label{section} Section \ref{section}
 ^D
 [ Para
-    [ Span
-        ( "section" , [] , [ ( "label" , "section" ) ] )
-        [ Str "[section]" ]
+    [ Span ( "section" , [] , [ ( "label" , "section" ) ] ) []
     , Space
     , Str "Section"
     , Space
-- 
cgit v1.2.3