diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2021-03-13 14:28:30 +0100 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2021-03-13 14:29:47 +0100 |
| commit | 00e8d0678edac34af7a412642fbf7d85442b15aa (patch) | |
| tree | bbc5033b5afdce7f9baa85c7699a389c934e8011 /src/Text/Pandoc | |
| parent | a8aa301428752d96cdd58d7f4ecaa7d054f3505d (diff) | |
| download | pandoc-00e8d0678edac34af7a412642fbf7d85442b15aa.tar.gz | |
Jira reader: mark divs created from panels with class "panel".
Closes: tarleb/jira-wiki-markup#2
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Jira.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Jira.hs b/src/Text/Pandoc/Readers/Jira.hs index 5a5d0ee1e..89aecbf56 100644 --- a/src/Text/Pandoc/Readers/Jira.hs +++ b/src/Text/Pandoc/Readers/Jira.hs @@ -71,10 +71,10 @@ toPandocCodeBlocks langMay params txt = Nothing -> [] in codeBlockWith ("", classes, map paramToPair params) txt --- | Create a pandoc @'Div'@ +-- | Create a pandoc @'Div'@ from a panel. toPandocDiv :: [Jira.Parameter] -> [Jira.Block] -> Blocks toPandocDiv params = - divWith ("", [], map paramToPair params) . foldMap jiraToPandocBlocks + divWith ("", ["panel"], map paramToPair params) . foldMap jiraToPandocBlocks paramToPair :: Jira.Parameter -> (Text, Text) paramToPair (Jira.Parameter key value) = (key, value) |