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/Pandoc')

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