Merge pull request #2968 from IvoBCD/docbook5-xlink-ns

Docbook writer: Declare xlink namespace in Docbook5 output
This commit is contained in:
John MacFarlane 2016-06-07 11:27:33 -07:00
commit 3e06172a00

View file

@ -117,7 +117,7 @@ elementToDocbook opts lvl (Sec _ _num (id',_,_) title elements) =
else "sect" ++ show n
| otherwise -> "simplesect"
idAttr = [("id", writerIdentifierPrefix opts ++ id') | not (null id')]
nsAttr = if writerDocbook5 opts && lvl == 0 then [("xmlns", "http://docbook.org/ns/docbook")]
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
in inTags True tag attribs $