diff options
| author | Jan-Otto Kröpke <mail@jkroepke.de> | 2019-08-08 23:08:46 +0200 |
|---|---|---|
| committer | Albert Krewinkel <albert+github@zeitkraut.de> | 2019-08-11 21:57:12 +0200 |
| commit | a0a41c7a8e4e385450c55459b9a01a59755766d2 (patch) | |
| tree | d7699f61e5fd63eb6881b521455164720f249218 /src/Text | |
| parent | e53c952997be5f14196bb2ff95f790daba066bcb (diff) | |
| download | pandoc-a0a41c7a8e4e385450c55459b9a01a59755766d2.tar.gz | |
JIRA writer: Remove escapeStringForJira for code blocks
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc/Writers/Jira.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Jira.hs b/src/Text/Pandoc/Writers/Jira.hs index fe66d874d..b0caf82f7 100644 --- a/src/Text/Pandoc/Writers/Jira.hs +++ b/src/Text/Pandoc/Writers/Jira.hs @@ -144,7 +144,7 @@ blockToJira _ (CodeBlock attr@(_,classes,_) str) = do let anchorMacro = anchor attr appendNewlineUnlessInList . T.intercalate "\n" $ (if anchorMacro == "" then id else (anchorMacro :)) - [start, escapeStringForJira (pack str), "{code}"] + [start, pack str, "{code}"] blockToJira opts (BlockQuote [p@(Para _)]) = do contents <- blockToJira opts p @@ -270,7 +270,7 @@ inlineToJira opts (Quoted DoubleQuote lst) = do inlineToJira opts (Cite _ lst) = inlineListToJira opts lst inlineToJira _ (Code attr str) = - return (anchor attr <> "{{" <> escapeStringForJira (pack str) <> "}}") + return (anchor attr <> "{{" <> pack str <> "}}") inlineToJira _ (Str str) = return $ escapeStringForJira (pack str) |