aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorJan-Otto Kröpke <mail@jkroepke.de>2019-08-08 23:08:46 +0200
committerAlbert Krewinkel <albert+github@zeitkraut.de>2019-08-11 21:57:12 +0200
commita0a41c7a8e4e385450c55459b9a01a59755766d2 (patch)
treed7699f61e5fd63eb6881b521455164720f249218 /src/Text/Pandoc/Writers
parente53c952997be5f14196bb2ff95f790daba066bcb (diff)
downloadpandoc-a0a41c7a8e4e385450c55459b9a01a59755766d2.tar.gz
JIRA writer: Remove escapeStringForJira for code blocks
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/Jira.hs4
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)