@@ -117,7 +117,7 @@ elementToDocbook opts lvl (Sec _ _num (id',_,_) title elements) =
117 else "sect" ++ show n
117 else "sect" ++ show n
118 | otherwise -> "simplesect"
118 | otherwise -> "simplesect"
119 idAttr = [("id", writerIdentifierPrefix opts ++ id') | not (null id')]
119 idAttr = [("id", writerIdentifierPrefix opts ++ id') | not (null id')]
120− nsAttr = if writerDocbook5 opts && lvl == 0 then [("xmlns", "http://docbook.org/ns/docbook")]
120+ nsAttr = if writerDocbook5 opts && lvl == 0 then [("xmlns", "http://docbook.org/ns/docbook"),("xmlns:xlink", "http://www.w3.org/1999/xlink")]
122 attribs = nsAttr ++ idAttr
122 attribs = nsAttr ++ idAttr
123 in inTags True tag attribs $
123 in inTags True tag attribs $