2017-03-24 19:13:00

1 files changed, 13 insertions, 0 deletions

diff --git a/tex/context/base/mkiv/util-sbx.lua b/tex/context/base/mkiv/util-sbx.lua
index 0db2e0295..66a650875 100644
--- a/tex/context/base/mkiv/util-sbx.lua
+++ b/tex/context/base/mkiv/util-sbx.lua
@@ -369,6 +369,9 @@ local runners = {
     resultof = function(...)
         local command = validcommand(...)
         if command then
+            if trace then
+                report("resultof: %s",command)
+            end
             local handle = iopopen(command,"r") -- already has flush
             if handle then
                 local result = handle:read("*all") or ""
@@ -380,12 +383,18 @@ local runners = {
     execute = function(...)
         local command = validcommand(...)
         if command then
+            if trace then
+                report("execute: %s",command)
+            end
             return osexecute(command)
         end
     end,
     pipeto = function(...)
         local command = validcommand(...)
         if command then
+            if trace then
+                report("pipeto: %s",command)
+            end
             return iopopen(command,"w") -- already has flush
         end
     end,
@@ -447,6 +456,10 @@ function sandbox.registerrunner(specification)
     end
 end
 
+function sandbox.getrunner(name)
+    return name and validrunners[name]
+end
+
 local function suspicious(str)
     return (find(str,"[/\\]") or find(command,"%.%.")) and true or false
 end