aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-06-21 08:49:00 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2021-06-21 08:49:00 -0700
commit82ad855f38b8fa8dc1cbfc14fa294dfd5f9f02ab (patch)
treee679640ecba8bb9cc4aa827883104d207811e31c /test
parent0c4ed0045a2adb611f83054ad29d68f46b0611c5 (diff)
downloadpandoc-82ad855f38b8fa8dc1cbfc14fa294dfd5f9f02ab.tar.gz
Markdown writer: Fix regression in code blocks with attributes.
Code blocks with a single class but nonempty attributes were having attributes drop as a result of #7242. Closes #7397.
Diffstat (limited to 'test')
-rw-r--r--test/command/7397.md14
1 files changed, 14 insertions, 0 deletions
diff --git a/test/command/7397.md b/test/command/7397.md
new file mode 100644
index 000000000..ca8b6a482
--- /dev/null
+++ b/test/command/7397.md
@@ -0,0 +1,14 @@
+```
+% pandoc -t markdown
+~~~~ { .haskell startFrom="100"}
+qsort [] = []
+qsort (x:xs) = qsort (filter (< x) xs) ++ [x] ++
+ qsort (filter (>= x) xs)
+~~~~
+^D
+``` {.haskell startFrom="100"}
+qsort [] = []
+qsort (x:xs) = qsort (filter (< x) xs) ++ [x] ++
+ qsort (filter (>= x) xs)
+```
+```