From 7fcf1d61843cde87627b09730fbad01c7a9031be Mon Sep 17 00:00:00 2001
From: Albert Krewinkel <albert@zeitkraut.de>
Date: Wed, 27 Oct 2021 22:24:39 +0200
Subject: Lua: re-add `t` and `tag` property to Attr values
Removal of these properties from Attr values was a regression.
---
src/Text/Pandoc/Lua/Marshaling/Attr.hs | 4 ++++
1 file changed, 4 insertions(+)
(limited to 'src/Text/Pandoc/Lua')
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
--
cgit v1.2.3