diff --git a/src/Text/Pandoc/Writers/Blaze.hs b/src/Text/Pandoc/Writers/Blaze.hs index 8233043a3..692e89e27 100644 --- a/src/Text/Pandoc/Writers/Blaze.hs +++ b/src/Text/Pandoc/Writers/Blaze.hs @@ -57,20 +57,20 @@ layoutMarkup = go True mempty (space' wrap <> literal (getText rawkey) <> char '=' - <> doubleQuotes (fromChoiceString wrap value) + <> doubleQuotes (fromChoiceString False value) <> attrs) h go wrap attrs (AddCustomAttribute key value h) = go wrap (space' wrap <> fromChoiceString wrap key <> char '=' - <> doubleQuotes (fromChoiceString wrap value) + <> doubleQuotes (fromChoiceString False value) <> attrs) h go wrap _ (Content content _) = fromChoiceString wrap content go wrap _ (Comment comment _) = literal "" go wrap attrs (Append h1 h2) = go wrap attrs h1 <> go wrap attrs h2 diff --git a/test/command/3534.md b/test/command/3534.md index 42dca9207..41bf9a5ff 100644 --- a/test/command/3534.md +++ b/test/command/3534.md @@ -2,9 +2,9 @@ % pandoc -f latex -t html I want to explain the interface of \lstinline[language=Java]{public class MyClass}. ^D -
I want to explain the interface of public class
-MyClass
.
I want to explain the interface of public class MyClass
.
I want to explain the interface of public class
-MyClass
.
I want to explain the interface of public class MyClass
.
I want to explain the interface of public class
-MyClass
.
I want to explain the interface of public class MyClass
.
A spider:
-Another spider:
+Another spider:
The moon:
Link to spider picture.
URL left alone: absolute.
^DA spider:
-Another spider:
+Another spider:
The moon:
Link to spider picture.