diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-02-05 16:49:27 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-02-05 16:49:27 -0800 |
| commit | a692bd28729f1c14b10bef1178ebf517b574cfaa (patch) | |
| tree | b928147713043c2baa3819629fece9601e6ad229 | |
| parent | 6cb4991f6b54d5853f11a01dc7faf048a647bee6 (diff) | |
| download | pandoc-a692bd28729f1c14b10bef1178ebf517b574cfaa.tar.gz | |
Custom writer: Pass attributes parameter to CaptionedImage.
Closes #2697.
| -rw-r--r-- | data/sample.lua | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Writers/Custom.hs | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/data/sample.lua b/data/sample.lua index 0cb492392..574f378cc 100644 --- a/data/sample.lua +++ b/data/sample.lua @@ -255,7 +255,7 @@ function html_align(align) end end -function CaptionedImage(src, tit, caption) +function CaptionedImage(src, tit, caption, attr) return '<div class="figure">\n<img src="' .. escape(src,true) .. '" title="' .. escape(tit,true) .. '"/>\n' .. '<p class="caption">' .. caption .. '</p>\n</div>' diff --git a/src/Text/Pandoc/Writers/Custom.hs b/src/Text/Pandoc/Writers/Custom.hs index 9671fc05b..d69eaaa64 100644 --- a/src/Text/Pandoc/Writers/Custom.hs +++ b/src/Text/Pandoc/Writers/Custom.hs @@ -222,8 +222,8 @@ blockToCustom _ Null = return "" blockToCustom lua (Plain inlines) = callfunc lua "Plain" inlines -blockToCustom lua (Para [Image _ txt (src,tit)]) = - callfunc lua "CaptionedImage" src tit txt +blockToCustom lua (Para [Image attr txt (src,tit)]) = + callfunc lua "CaptionedImage" src tit txt (attrToMap attr) blockToCustom lua (Para inlines) = callfunc lua "Para" inlines |