2022-07-24 12:18:00

1 files changed, 29 insertions, 5 deletions

diff --git a/tex/context/base/mkxl/mlib-fio.lmt b/tex/context/base/mkxl/mlib-fio.lmt
index 7bb6c0e9b..e4db28cea 100644
--- a/tex/context/base/mkxl/mlib-fio.lmt
+++ b/tex/context/base/mkxl/mlib-fio.lmt
@@ -85,13 +85,37 @@ local function findmpfile(name,ftype)
     return nil
 end
 
+-- variant 1
+
+-- finders.file = function(specification,name,mode,kind)
+--     if mode == "r" then
+--         return findmpfile(name,kind)
+--     elseif file.is_writable(name) then
+--         return name
+--     else
+--         return nil
+--     end
+-- end
+
+-- variant 2
+
+-- finders.file = function(specification,name,mode,kind)
+--     if not mode or mode == "r" then
+--         return findmpfile(name,kind)
+--     elseif file.is_writable(name) then
+--         return name
+--     else
+--         return nil
+--     end
+-- end
+
+-- variant 3
+
 finders.file = function(specification,name,mode,kind)
-    if mode == "r" then
-        return findmpfile(name,kind)
-    elseif file.is_writable(name) then
-        return name
+    if mode == "w" then
+        return file.is_writable(name) and name or nil
     else
-        return nil
+        return findmpfile(name,kind) or nil
     end
 end