diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/LaTeX/Inline.hs | 3 | ||||
| -rw-r--r-- | 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 |