From 8dd8f492c16aa87f074ff3229941007be77e46c2 Mon Sep 17 00:00:00 2001
From: d-dorazio <daniele.dorazio@adroll.com>
Date: Thu, 12 Oct 2017 23:11:57 +0200
Subject: markdown writer: always write bracketed_spans' attributes
---
src/Text/Pandoc/Writers/Markdown.hs | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
(limited to 'src/Text')
diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs
index 0221ba6ef..a54f4eb85 100644
--- a/src/Text/Pandoc/Writers/Markdown.hs
+++ b/src/Text/Pandoc/Writers/Markdown.hs
@@ -952,8 +952,10 @@ inlineToMarkdown opts (Span attrs ils) = do
True -> contents
False | attrs == nullAttr -> contents
| isEnabled Ext_bracketed_spans opts ->
- "[" <> contents <> "]" <>
- linkAttributes opts attrs
+ let attrs' = if attrs /= nullAttr
+ then attrsToMarkdown attrs
+ else empty
+ in "[" <> contents <> "]" <> attrs'
| isEnabled Ext_raw_html opts ||
isEnabled Ext_native_spans opts ->
tagWithAttrs "span" attrs <> contents <> text "</span>"
--
cgit v1.2.3