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')

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