diff options
| author | Mathieu Boespflug <m@tweag.io> | 2020-06-14 19:44:22 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-06-14 10:44:22 -0700 |
| commit | 390bd51fdc0055b905c990c4db1be47bb64e055d (patch) | |
| tree | 6abe0a790466e30b97768b1a0edb64e7952adc5f /src/Text/Pandoc/Readers/DocBook.hs | |
| parent | e321843f321c5c22a48b19933625f0b026b1ad91 (diff) | |
| download | pandoc-390bd51fdc0055b905c990c4db1be47bb64e055d.tar.gz | |
Docbook reader: treat envar and systemitem like code (#6435)
Diffstat (limited to 'src/Text/Pandoc/Readers/DocBook.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/DocBook.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs index 884595ae8..06c6ef870 100644 --- a/src/Text/Pandoc/Readers/DocBook.hs +++ b/src/Text/Pandoc/Readers/DocBook.hs @@ -139,7 +139,7 @@ List of all DocBook tags, with [x] indicating implemented, [x] emphasis - Emphasized text [x] entry - A cell in a table [ ] entrytbl - A subtable appearing in place of an Entry in a table -[ ] envar - A software environment variable +[x] envar - A software environment variable [x] epigraph - A short inscription at the beginning of a document or component note: also handle embedded attribution tag [x] equation - A displayed mathematical equation @@ -445,7 +445,7 @@ List of all DocBook tags, with [x] indicating implemented, [ ] synopfragmentref - A reference to a fragment of a command synopsis [ ] synopsis - A general-purpose element for representing the syntax of commands or functions -[ ] systemitem - A system-related item or term +[x] systemitem - A system-related item or term [ ] table - A formal table in a document [ ] task - A task to be completed [ ] taskprerequisites - The prerequisites for a task @@ -976,6 +976,7 @@ parseInline (Elem e) = "classname" -> codeWithLang "code" -> codeWithLang "filename" -> codeWithLang + "envar" -> codeWithLang "literal" -> codeWithLang "computeroutput" -> codeWithLang "prompt" -> codeWithLang @@ -994,6 +995,7 @@ parseInline (Elem e) = "symbol" -> codeWithLang "constant" -> codeWithLang "userinput" -> codeWithLang + "systemitem" -> codeWithLang "varargs" -> return $ code "(...)" "keycap" -> return (str $ T.pack $ strContent e) "keycombo" -> keycombo <$> |