From 32cbb8f46d968205316c64957f9c37c9db84fce8 Mon Sep 17 00:00:00 2001 From: Mauro Bieg Date: Sat, 31 Dec 2016 04:03:43 +0100 Subject: DocBook5 writer: make id attribute xml:id, fixes #3329 (#3330) --- src/Text/Pandoc/Writers/Docbook.hs | 5 ++- tests/writer.docbook5 | 62 +++++++++++++++++++------------------- 2 files changed, 35 insertions(+), 32 deletions(-) diff --git a/src/Text/Pandoc/Writers/Docbook.hs b/src/Text/Pandoc/Writers/Docbook.hs index 5321d46df..44f96d700 100644 --- a/src/Text/Pandoc/Writers/Docbook.hs +++ b/src/Text/Pandoc/Writers/Docbook.hs @@ -123,7 +123,10 @@ elementToDocbook opts lvl (Sec _ _num (id',_,_) title elements) = then "section" else "sect" ++ show n _ -> "simplesect" - idAttr = [("id", writerIdentifierPrefix opts ++ id') | not (null id')] + idName = if writerDocbook5 opts + then "xml:id" + else "id" + idAttr = [(idName, writerIdentifierPrefix opts ++ id') | not (null id')] nsAttr = if writerDocbook5 opts && lvl == 0 then [("xmlns", "http://docbook.org/ns/docbook"),("xmlns:xlink", "http://www.w3.org/1999/xlink")] else [] attribs = nsAttr ++ idAttr diff --git a/tests/writer.docbook5 b/tests/writer.docbook5 index 5261a35be..915b35e73 100644 --- a/tests/writer.docbook5 +++ b/tests/writer.docbook5 @@ -19,16 +19,16 @@ This is a set of tests for pandoc. Most of them are adapted from John Gruber’s markdown test suite. -
+
Headers -