From 95538931c5aa680a8f8c491fa3f9bfedfc6a594f Mon Sep 17 00:00:00 2001 From: Marius Date: Thu, 20 Oct 2011 14:40:14 +0300 Subject: beta 2011.10.20 13:25 --- tex/context/base/l-dir.lua | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'tex/context/base/l-dir.lua') diff --git a/tex/context/base/l-dir.lua b/tex/context/base/l-dir.lua index 1d59b9220..ee831f98a 100644 --- a/tex/context/base/l-dir.lua +++ b/tex/context/base/l-dir.lua @@ -94,13 +94,13 @@ local function collectpattern(path,patt,recurse,result) local ok, scanner result = result or { } if path == "/" then - ok, scanner = xpcall(function() return walkdir(path..".") end, function() end) -- kepler safe + ok, scanner, first = xpcall(function() return walkdir(path..".") end, function() end) -- kepler safe else - ok, scanner = xpcall(function() return walkdir(path) end, function() end) -- kepler safe + ok, scanner, first = xpcall(function() return walkdir(path) end, function() end) -- kepler safe end if ok and type(scanner) == "function" then if not find(path,"/$") then path = path .. '/' end - for name in scanner do + for name in scanner, first do local full = path .. name local attr = attributes(full) local mode = attr.mode -- cgit v1.2.3