diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2020-03-13 09:43:13 +0100 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2020-03-13 09:52:28 +0100 |
| commit | 7eb991484127a8c79b8db76743d2d63ee47e79ca (patch) | |
| tree | c42380f0d207614b3e63c5daee48a4a0ecafbca4 /src/Text/Pandoc/Readers/Jira.hs | |
| parent | 91f2bcfe73fa3a489654ee74bca02e24423dc5c0 (diff) | |
| download | pandoc-7eb991484127a8c79b8db76743d2d63ee47e79ca.tar.gz | |
Jira reader: support colored inline text, indented lists
* Support for colored inlines has been added.
* Lists are now allowed to be indented; i.e., lists are still recognized
if list markers are preceded by spaces.
Closes: #6183, #6184
Diffstat (limited to 'src/Text/Pandoc/Readers/Jira.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/Jira.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Jira.hs b/src/Text/Pandoc/Readers/Jira.hs index 46077a4a9..d79a996a8 100644 --- a/src/Text/Pandoc/Readers/Jira.hs +++ b/src/Text/Pandoc/Readers/Jira.hs @@ -121,6 +121,8 @@ jiraToPandocInlines :: Jira.Inline -> Inlines jiraToPandocInlines = \case Jira.Anchor t -> spanWith (t, [], []) mempty Jira.AutoLink url -> link (Jira.fromURL url) "" (str (Jira.fromURL url)) + Jira.ColorInline c ils -> spanWith ("", [], [("color", colorName c)]) $ + fromInlines ils Jira.Emoji icon -> str . iconUnicode $ icon Jira.Entity entity -> str . fromEntity $ entity Jira.Image _ url -> image (Jira.fromURL url) "" mempty |