From 75be509021abdcd01f7d5caf35d026647042322a Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Fri, 4 Jun 2021 18:35:45 +0200
Subject: 2021-06-04 17:23:00

---
 tex/context/base/mkiv/lxml-tex.lua | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

(limited to 'tex/context/base/mkiv/lxml-tex.lua')

diff --git a/tex/context/base/mkiv/lxml-tex.lua b/tex/context/base/mkiv/lxml-tex.lua
index 75bd9b84c..148484f51 100644
--- a/tex/context/base/mkiv/lxml-tex.lua
+++ b/tex/context/base/mkiv/lxml-tex.lua
@@ -2070,6 +2070,28 @@ do
         end
     end
 
+    function lxml.ifatt(id,a,value)
+        local e = getid(id)
+        if e then
+            local at = e.at
+            att = at and at[a] or ""
+        else
+            att = ""
+        end
+        return att == value
+    end
+
+    function lxml.ifattempty(id,a)
+        local e = getid(id)
+        if e then
+            local at = e.at
+            if at and at[a] ~= "" then
+                return true
+            end
+        end
+        return false
+    end
+
     function lxml.refatt(id,a)
         local e = getid(id)
         if e then
-- 
cgit v1.2.3