aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Lua/Marshaling
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2021-10-27 22:24:39 +0200
committerAlbert Krewinkel <albert@zeitkraut.de>2021-10-27 22:32:19 +0200
commit7fcf1d61843cde87627b09730fbad01c7a9031be (patch)
treec0eb0214328a898932755ac110ec97b1887ea7e7 /src/Text/Pandoc/Lua/Marshaling
parent25a86fc06fd5d7e07251ca9bd758cc42c4234d70 (diff)
downloadpandoc-7fcf1d61843cde87627b09730fbad01c7a9031be.tar.gz
Lua: re-add `t` and `tag` property to Attr values
Removal of these properties from Attr values was a regression.
Diffstat (limited to 'src/Text/Pandoc/Lua/Marshaling')
-rw-r--r--src/Text/Pandoc/Lua/Marshaling/Attr.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Lua/Marshaling/Attr.hs b/src/Text/Pandoc/Lua/Marshaling/Attr.hs
index 1b35e40ad..f69acc61e 100644
--- a/src/Text/Pandoc/Lua/Marshaling/Attr.hs
+++ b/src/Text/Pandoc/Lua/Marshaling/Attr.hs
@@ -56,6 +56,10 @@ typeAttr = deftype "Attr"
### return
<#> parameter peekAttr "attr" "Attr" ""
=#> functionResult pushAttr "Attr" "new Attr element"
+ , readonly "tag" "element type tag (always 'Attr')"
+ (pushText, const "Attr")
+
+ , alias "t" "alias for `tag`" ["tag"]
]
pushAttr :: LuaError e => Pusher e Attr