diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2021-01-01 10:50:58 +0100 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2021-01-01 11:18:36 +0100 |
| commit | 17e3efc785fa8b0680ec6d4ebaac1ea6bdb57e1a (patch) | |
| tree | 0f0fb6f2b55a7d0cb237804452ee3f14999a72c2 /test | |
| parent | 23f964b9076f9795b00e740d20feebeb1d6d91db (diff) | |
| download | pandoc-17e3efc785fa8b0680ec6d4ebaac1ea6bdb57e1a.tar.gz | |
Org reader: restructure output of captioned code blocks
The Div wrapper of code blocks with captions now has the class
"captioned-content". The caption itself is added as a Plain block
inside a Div of class "caption". This makes it easier to write filters
which match on captioned code blocks. Existing filters will need to be
updated.
Closes: #6977
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Readers/Org/Block/CodeBlock.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/test/Tests/Readers/Org/Block/CodeBlock.hs b/test/Tests/Readers/Org/Block/CodeBlock.hs index adf6661ca..2648a6e1f 100644 --- a/test/Tests/Readers/Org/Block/CodeBlock.hs +++ b/test/Tests/Readers/Org/Block/CodeBlock.hs @@ -185,10 +185,10 @@ tests = , "#+end_src" ] =?> divWith - nullAttr + ("", ["captioned-content"], [] ) (mappend - (plain $ spanWith ("", ["label"], []) - (spcSep [ "Functor", "laws", "in", "Haskell" ])) + (divWith ("", ["caption"], []) $ + plain (spcSep [ "Functor", "laws", "in", "Haskell" ])) (codeBlockWith ("functor-laws", ["haskell"], []) (T.unlines [ "fmap id = id" , "fmap (p . q) = (fmap p) . (fmap q)" |