From d167e9ccebdae0d0081d3c8abd95a440d96a867c Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Sun, 11 Aug 2019 20:47:52 +0200
Subject: 2019-08-11 20:11:00

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

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

diff --git a/tex/context/base/mkiv/mlib-lua.lua b/tex/context/base/mkiv/mlib-lua.lua
index a3e5e84cd..9d271de82 100644
--- a/tex/context/base/mkiv/mlib-lua.lua
+++ b/tex/context/base/mkiv/mlib-lua.lua
@@ -120,6 +120,12 @@ do
         return currentmpx
     end
 
+    local status = mplib.status
+
+    function metapost.currentmpxstatus()
+        return status and status(currentmpx) or 0
+    end
+
 end
 
 do
-- 
cgit v1.2.3