git.iko.soy/typeable/pandoc
on master help sign in
DocBook reader: Support uri tag.
commitd46d2000f4c30da7eca29459ffd3fde29117500e authorJohn MacFarlane <fiddlosopher@gmail.com> dateFri 11 May 2012, 20:16 (14 years ago) parent5dfcf00
1 file changed+2−1
src/Text/Pandoc/Readers/DocBook.hs+2−1
src/Text/Pandoc/Readers/DocBook.hs+2−1
@@ -470,7 +470,7 @@ List of all DocBook tags, with [x] indicating implemented,
470470[ ] type - The classification of a value
471471[x] ulink - A link that addresses its target by means of a URL
472472 (Uniform Resource Locator)
473−[ ] uri - A Uniform Resource Identifier
473+[x] uri - A Uniform Resource Identifier
474474[x] userinput - Data entered by the user
475475[x] varargs - An empty element in a function synopsis indicating a variable
476476 number of arguments
@@ -858,6 +858,7 @@ parseInline (Elem e) =
858858 "varargs" -> return $ code "(...)"
859859 "email" -> return $ link ("mailto:" ++ strContent e) ""
860860 $ code $ strContent e
861+ "uri" -> return $ link (strContent e) "" $ code $ strContent e
861862 "ulink" -> link (attrValue "url" e) "" <$> innerInlines
862863 "link" -> case findAttr (QName "href" (Just "http://www.w3.org/1999/xlink") Nothing) e of
863864 Just href -> link href "" <$> innerInlines