aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMathieu Boespflug <m@tweag.io>2020-06-14 19:43:53 +0200
committerGitHub <noreply@github.com>2020-06-14 10:43:53 -0700
commite321843f321c5c22a48b19933625f0b026b1ad91 (patch)
tree9c94492ed402f52d63872695017753574684eb22 /src
parent12a35dd0d0f7363ad5b85ab859925113c65aa61f (diff)
downloadpandoc-e321843f321c5c22a48b19933625f0b026b1ad91.tar.gz
Docbook: implement <replaceable> (#6437)
A `<replaceable>` is a placeholder that a user is instructed to replace with a value of their own, like `<replaceable>prefix</replacable>/bin/foo`. In the standard Docbook toolchain, this typically appears emphasized, and no other adornement. But a `<replaceable>` is nearly always in a code element, where emphasis won't work. So we do the same thing as for `<optional>`: decorate the content with brackets.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/DocBook.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs
index 1b1cbf6ab..884595ae8 100644
--- a/src/Text/Pandoc/Readers/DocBook.hs
+++ b/src/Text/Pandoc/Readers/DocBook.hs
@@ -363,7 +363,7 @@ List of all DocBook tags, with [x] indicating implemented,
[x] releaseinfo - Information about a particular release of a document
[ ] remark - A remark (or comment) intended for presentation in a draft
manuscript
-[ ] replaceable - Content that may or must be replaced by the user
+[x] replaceable - Content that may or must be replaced by the user
[ ] returnvalue - The value returned by a function
[ ] revdescription - A extended description of a revision to a document
[ ] revhistory - A history of the revisions to a document
@@ -983,6 +983,8 @@ parseInline (Elem e) =
"option" -> codeWithLang
"optional" -> do x <- getInlines e
return $ str "[" <> x <> str "]"
+ "replaceable" -> do x <- getInlines e
+ return $ str "<" <> x <> str ">"
"markup" -> codeWithLang
"wordasword" -> emph <$> innerInlines
"command" -> codeWithLang