@@ -232,7 +232,7 @@ List of all DocBook tags, with [x] indicating implemented,
232 information resides
232 information resides
233[x] mediaobject - A displayed media object (video, audio, image, etc.)
233[x] mediaobject - A displayed media object (video, audio, image, etc.)
234[ ] mediaobjectco - A media object that contains callouts
234[ ] mediaobjectco - A media object that contains callouts
235−[ ] member - An element of a simple list
235+[x] member - An element of a simple list
236[ ] menuchoice - A selection or series of selections from a menu
236[ ] menuchoice - A selection or series of selections from a menu
237[ ] methodname - The name of a method
237[ ] methodname - The name of a method
238[ ] methodparam - Parameters to a method
238[ ] methodparam - Parameters to a method
@@ -396,7 +396,7 @@ List of all DocBook tags, with [x] indicating implemented,
396[ ] sidebarinfo - Meta-information for a Sidebar
396[ ] sidebarinfo - Meta-information for a Sidebar
397[x] simpara - A paragraph that contains only text and inline markup, no block
397[x] simpara - A paragraph that contains only text and inline markup, no block
399−[ ] simplelist - An undecorated list of single words or short phrases
399+[x] simplelist - An undecorated list of single words or short phrases
400[ ] simplemsgentry - A wrapper for a simpler entry in a message set
400[ ] simplemsgentry - A wrapper for a simpler entry in a message set
401[ ] simplesect - A section of a document with no subdivisions
401[ ] simplesect - A section of a document with no subdivisions
402[ ] spanspec - Formatting information for a spanned column in a table
402[ ] spanspec - Formatting information for a spanned column in a table
@@ -839,6 +839,7 @@ parseInline (Elem e) =
839 return $ if qt == SingleQuote
839 return $ if qt == SingleQuote
840 then singleQuoted contents
840 then singleQuoted contents
841 else doubleQuoted contents
841 else doubleQuoted contents
842+ "simplelist" -> simpleList
842 "code" -> codeWithLang
843 "code" -> codeWithLang
843 "filename" -> codeWithLang
844 "filename" -> codeWithLang
844 "literal" -> codeWithLang
845 "literal" -> codeWithLang
@@ -885,4 +886,5 @@ parseInline (Elem e) =
887 return $ codeWith (attrValue "id" e,classes',[]) $ strContent e
888 return $ codeWith (attrValue "id" e,classes',[]) $ strContent e
888−
889+ simpleList = (mconcat . intersperse (str "," <> space)) <$> mapM getInlines
890+ (filterChildren (named "member") e)