if not modules then modules = { } end modules ['data-ctx'] = { version = 1.001, comment = "companion to luat-lib.mkiv", author = "Hans Hagen, PRAGMA-ADE, Hasselt NL", copyright = "PRAGMA ADE / ConTeXt Development Team", license = "see context related readme files" } local format = string.format local report_resolvers = logs.new("resolvers") local resolvers = resolvers local function saveusedfilesin_trees() local jobname = environment.jobname if not jobname or jobname == "" then jobname = "luatex" end local filename = file.replacesuffix(jobname,'jlg') local f = io.open(filename,'w') if f then f:write("\n") f:write("\n") f:write(format("\t%s\n",jobname)) f:write(format("\t%s\n",environment.version)) local found = resolvers.instance.foundintrees local sorted = table.sortedkeys(found) if #sorted > 0 then f:write("\t\n") for k=1,#sorted do local v = sorted[k] f:write(format("\t\t%s\n",found[v],v)) end f:write("\t\n") else f:write("\t\n") end f:write("\n") f:close() report_resolvers("saving used tree files in '%s'",filename) end end directives.register("system.dumpfiles", function() saveusedfilesintrees() end)