RST writer: Don't wrap link references.

Closes #487.
This commit is contained in:
John MacFarlane 2012-04-21 09:46:05 -07:00
parent 9989170df2
commit 9a347c37ad

View file

@ -97,7 +97,7 @@ keyToRST (label, (src, _)) = do
let label'' = if ':' `elem` (render Nothing label')
then char '`' <> label' <> char '`'
else label'
return $ ".. _" <> label'' <> ": " <> text src
return $ nowrap $ ".. _" <> label'' <> ": " <> text src
-- | Return RST representation of notes.
notesToRST :: [[Block]] -> State WriterState Doc