aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2021-11-02 17:38:49 +0100
committerAlbert Krewinkel <albert@zeitkraut.de>2021-11-02 17:40:07 +0100
commitcce49c5d4b7429ca3455d356dff59f404f7e6d4b (patch)
tree897b2d7847f3243ed0ce03511a16ef079b5c7748 /src/Text/Pandoc
parent70eeeca9c7b399158f01c40ab2f6ef58bd76207f (diff)
downloadpandoc-cce49c5d4b7429ca3455d356dff59f404f7e6d4b.tar.gz
Lua: be more forgiving when retrieving the Image `caption` property
Fixes a regression introduced in 2.15.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Lua/Marshaling/AST.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Lua/Marshaling/AST.hs b/src/Text/Pandoc/Lua/Marshaling/AST.hs
index 469dd4285..4363f7e4f 100644
--- a/src/Text/Pandoc/Lua/Marshaling/AST.hs
+++ b/src/Text/Pandoc/Lua/Marshaling/AST.hs
@@ -710,7 +710,7 @@ typeInline = deftype "Inline"
(pushPandocList pushInline, \case
Image _ capt _ -> Actual capt
_ -> Absent)
- (peekInlines, \case
+ (peekInlinesFuzzy, \case
Image attr _ target -> Actual . (\capt -> Image attr capt target)
_ -> const Absent)
, possibleProperty "citations" "list of citations"