diff options
Diffstat (limited to 'pandoc-lua-engine')
| -rw-r--r-- | pandoc-lua-engine/src/Text/Pandoc/Lua/Writer/Classic.hs | 6 | ||||
| -rw-r--r-- | pandoc-lua-engine/test/sample.lua | 6 | ||||
| -rw-r--r-- | pandoc-lua-engine/test/writer.custom | 3 |
3 files changed, 14 insertions, 1 deletions
diff --git a/pandoc-lua-engine/src/Text/Pandoc/Lua/Writer/Classic.hs b/pandoc-lua-engine/src/Text/Pandoc/Lua/Writer/Classic.hs index 6701efdc3..19f5ad154 100644 --- a/pandoc-lua-engine/src/Text/Pandoc/Lua/Writer/Classic.hs +++ b/pandoc-lua-engine/src/Text/Pandoc/Lua/Writer/Classic.hs @@ -157,6 +157,12 @@ blockToCustom (CodeBlock attr str) = blockToCustom (BlockQuote blocks) = invoke "BlockQuote" (Stringify blocks) +blockToCustom (Figure attr (Caption _ cbody) content) = + invoke "Figure" + (Stringify cbody) + (Stringify content) + (attrToMap attr) + blockToCustom (Table _ blkCapt specs thead tbody tfoot) = let (capt, aligns, widths, headers, rows) = toLegacyTable blkCapt specs thead tbody tfoot aligns' = map show aligns diff --git a/pandoc-lua-engine/test/sample.lua b/pandoc-lua-engine/test/sample.lua index aacc0d2b6..0294cfbaf 100644 --- a/pandoc-lua-engine/test/sample.lua +++ b/pandoc-lua-engine/test/sample.lua @@ -295,6 +295,12 @@ function CaptionedImage(src, tit, caption, attr) end end +function Figure(caption, contents, attr) + return '<figure' .. attributes(attr) .. '>\n' .. contents .. + '\n<figcaption>' .. caption .. '</figcaption>\n' .. + '</figure>' +end + -- Caption is a string, aligns is an array of strings, -- widths is an array of floats, headers is an array of -- strings, rows is an array of arrays of strings. diff --git a/pandoc-lua-engine/test/writer.custom b/pandoc-lua-engine/test/writer.custom index eb53363fa..aaeefdd51 100644 --- a/pandoc-lua-engine/test/writer.custom +++ b/pandoc-lua-engine/test/writer.custom @@ -737,7 +737,8 @@ So is ‘pine.’</p> <p>From “Voyage dans la Lune” by Georges Melies (1902):</p> <figure> -<img src="lalune.jpg" id="" alt="lalune"/><figcaption>lalune</figcaption> +<img src="lalune.jpg" title="Voyage dans la Lune"/> +<figcaption>lalune</figcaption> </figure> <p>Here is a movie <img src="movie.jpg" title=""/> icon.</p> |