From 63bb70d210dc6e8a17959c4e056fe41da3f1c398 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Fri, 19 Jun 2020 12:25:31 +0200
Subject: 2020-06-19 11:07:00

---
 tex/context/base/mkiv/node-nut.lua | 22 ++++++++++++++++++++--
 1 file changed, 20 insertions(+), 2 deletions(-)

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

diff --git a/tex/context/base/mkiv/node-nut.lua b/tex/context/base/mkiv/node-nut.lua
index b809ceb7a..e9bb71b80 100644
--- a/tex/context/base/mkiv/node-nut.lua
+++ b/tex/context/base/mkiv/node-nut.lua
@@ -864,6 +864,17 @@ local getstate = direct.getstate
 local setstate = direct.setstate
 
 if not setstate or not getstate then
+ -- setstate = function(n,v)
+ --     setprop(n,"state",v)
+ -- end
+ -- getstate = function(n,v)
+ --     local s = getprop(n,"state")
+ --     if v then
+ --         return s == v
+ --     else
+ --         return s
+ --     end
+ -- end
     setstate = function(n,v)
         local p = propertydata[n]
         if p then
@@ -884,10 +895,17 @@ if not setstate or not getstate then
             return nil
         end
     end
-    nuts.setstate = setstate
-    nuts.getstate = getstate
 end
 
+nuts.setstate = setstate
+nuts.getstate = getstate
+
+local getscript = direct.getscript or function(n,v) end -- elsewhere
+local setscript = direct.setscript or function(n,v) end -- elsewhere
+
+nuts.setscript = getscript
+nuts.getscript = setscript
+
 nuts.isdone = function(n,k)
     local p = propertydata[n]
     if not p then
-- 
cgit v1.2.3