git.iko.soy/typeable/pandoc
on master help sign in
Merge pull request #1496 from mpickering/master

Org Writer: Write anchor elements

commit08bed142bac5b245d72810f08c2170df671cba5c authorJohn MacFarlane <jgm@berkeley.edu> dateThu 7 Aug 2014, 16:29 (12 years ago) parent17e48ba07bb41d
1 file changed+2
src/Text/Pandoc/Writers/Org.hs+2
src/Text/Pandoc/Writers/Org.hs+2
@@ -238,6 +238,8 @@ inlineListToOrg lst = mapM inlineToOrg lst >>= return . hcat
238238
239239-- | Convert Pandoc inline element to Org.
240240inlineToOrg :: Inline -> State WriterState Doc
241+inlineToOrg (Span (uid, [], []) []) =
242+ return $ "<<" <> text uid <> ">>"
241243inlineToOrg (Span _ lst) =
242244 inlineListToOrg lst
243245inlineToOrg (Emph lst) = do