diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2020-03-31 10:00:49 +0200 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2020-03-31 10:04:55 +0200 |
| commit | 7df0710094b521c52f7e312751fe90890768f76c (patch) | |
| tree | b4e851833a2e86ad4a4429dfe472860633699e9f | |
| parent | ff9be6b38429b502b1582f2395b824305eb8c99c (diff) | |
| download | pandoc-7df0710094b521c52f7e312751fe90890768f76c.tar.gz | |
Jira reader: use span with class `underline` for inserted text
Jira text which is marked as `+inserted+` is converted into pandoc's
default representation for underlined text: a span with class
`underline`. Previously, the span was marked with the non-standard class
`inserted`.
Closes: #6237
| -rw-r--r-- | src/Text/Pandoc/Readers/Jira.hs | 2 | ||||
| -rw-r--r-- | test/Tests/Readers/Jira.hs | 4 |
2 files changed, 5 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Jira.hs b/src/Text/Pandoc/Readers/Jira.hs index cfe8ba81c..d6fa688e3 100644 --- a/src/Text/Pandoc/Readers/Jira.hs +++ b/src/Text/Pandoc/Readers/Jira.hs @@ -140,7 +140,7 @@ jiraToPandocInlines = \case fromStyle = \case Jira.Emphasis -> emph - Jira.Insert -> spanWith ("", ["inserted"], []) + Jira.Insert -> spanWith ("", ["underline"], []) Jira.Strikeout -> strikeout Jira.Strong -> strong Jira.Subscript -> subscript diff --git a/test/Tests/Readers/Jira.hs b/test/Tests/Readers/Jira.hs index 1ae3244ab..05fc9a3ab 100644 --- a/test/Tests/Readers/Jira.hs +++ b/test/Tests/Readers/Jira.hs @@ -126,6 +126,10 @@ tests = let attr = ("", [], [("align", "right"), ("vspace", "4")]) in para $ imageWith attr "image.gif" "Hello" mempty + , "inserted text" =: + "+the new version+" =?> + para (spanWith ("", ["underline"], []) "the new version") + , "HTML entity" =: "me & you" =?> para "me & you" |