@@ -232,7 +232,7 @@ List of all DocBook tags, with [x] indicating implemented,
232232 information resides
233233[x] mediaobject - A displayed media object (video, audio, image, etc.)
234234[ ] mediaobjectco - A media object that contains callouts
235−[ ] member - An element of a simple list
235+[x] member - An element of a simple list
236236[ ] menuchoice - A selection or series of selections from a menu
237237[ ] methodname - The name of a method
238238[ ] methodparam - Parameters to a method
@@ -396,7 +396,7 @@ List of all DocBook tags, with [x] indicating implemented,
396396[ ] sidebarinfo - Meta-information for a Sidebar
397397[x] simpara - A paragraph that contains only text and inline markup, no block
398398 elements
399−[ ] simplelist - An undecorated list of single words or short phrases
399+[x] simplelist - An undecorated list of single words or short phrases
400400[ ] simplemsgentry - A wrapper for a simpler entry in a message set
401401[ ] simplesect - A section of a document with no subdivisions
402402[ ] spanspec - Formatting information for a spanned column in a table
@@ -839,6 +839,7 @@ parseInline (Elem e) =
839839 return $ if qt == SingleQuote
840840 then singleQuoted contents
841841 else doubleQuoted contents
842+ "simplelist" -> simpleList
842843 "code" -> codeWithLang
843844 "filename" -> codeWithLang
844845 "literal" -> codeWithLang
@@ -885,4 +886,5 @@ parseInline (Elem e) =
885886 "" -> []
886887 l -> [l]
887888 return $ codeWith (attrValue "id" e,classes',[]) $ strContent e
888−
889+ simpleList = (mconcat . intersperse (str "," <> space)) <$> mapM getInlines
890+ (filterChildren (named "member") e)