@@ -368,6 +368,7 @@ inlineMarkup = choice [ simpleInline (string "??") (Cite [])
368368 , simpleInline (string "__") Emph
369369 , simpleInline (char '*') Strong
370370 , simpleInline (char '_') Emph
371+ , simpleInline (char '+') Emph -- approximates underline
371372 , simpleInline (char '-') Strikeout
372373 , simpleInline (char '^') Superscript
373374 , simpleInline (char '~') Subscript