diff options
| author | Kim Alvefur <zash@zash.se> | 2016-01-28 15:11:33 +0100 |
|---|---|---|
| committer | Kim Alvefur <zash@zash.se> | 2016-01-28 15:11:33 +0100 |
| commit | 7b0ac21c1166bf2b897cff3880a7140dcec0fd24 (patch) | |
| tree | b4f0b153db833962180e02e297b58bc1b73354ed /tests/test.lua | |
| parent | fcf557af0bdcd02b9ff50cd545e2bf5e2d7c34a1 (diff) | |
| parent | dc8c136359eaa5ca322f9a04ac0aca14c6330f5b (diff) | |
| download | prosody-7b0ac21c1166bf2b897cff3880a7140dcec0fd24.tar.gz prosody-7b0ac21c1166bf2b897cff3880a7140dcec0fd24.zip | |
Merge 0.10->trunk
Diffstat (limited to 'tests/test.lua')
| -rw-r--r-- | tests/test.lua | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/tests/test.lua b/tests/test.lua index 4f6c5335..4863c4e7 100644 --- a/tests/test.lua +++ b/tests/test.lua @@ -42,6 +42,8 @@ local _realG = _G; require "util.import" +local envloadfile = require "util.envload".envloadfile; + local env_mt = { __index = function (t,k) return rawget(_realG, k) or print("WARNING: Attempt to access nil global '"..tostring(k).."'"); end }; function testlib_new_env(t) return setmetatable(t or {}, env_mt); @@ -79,13 +81,12 @@ function dosingletest(testname, fname) local tests = setmetatable({}, { __index = _realG }); tests.__unit = testname; tests.__test = fname; - local chunk, err = loadfile(testname); + local chunk, err = envloadfile(testname, tests); if not chunk then print("WARNING: ", "Failed to load tests for "..testname, err); return; end - setfenv(chunk, tests); local success, err = pcall(chunk); if not success then print("WARNING: ", "Failed to initialise tests for "..testname, err); @@ -119,13 +120,12 @@ function dotest(unitname) _fakeG._G = _fakeG; local tests = setmetatable({}, { __index = _fakeG }); tests.__unit = unitname; - local chunk, err = loadfile("test_"..unitname:gsub("%.", "_")..".lua"); + local chunk, err = envloadfile("test_"..unitname:gsub("%.", "_")..".lua", tests); if not chunk then print("WARNING: ", "Failed to load tests for "..unitname, err); return; end - setfenv(chunk, tests); local success, err = pcall(chunk); if not success then print("WARNING: ", "Failed to initialise tests for "..unitname, err); @@ -134,7 +134,7 @@ function dotest(unitname) if tests.env then setmetatable(tests.env, { __index = _realG }); end local unit = setmetatable({}, { __index = setmetatable({ _G = tests.env or _fakeG }, { __index = tests.env or _fakeG }) }); local fn = "../"..unitname:gsub("%.", "/")..".lua"; - local chunk, err = loadfile(fn); + local chunk, err = envloadfile(fn, unit); if not chunk then print("WARNING: ", "Failed to load module: "..unitname, err); return; @@ -145,7 +145,6 @@ function dotest(unitname) setmetatable(unit, nil); unit._M = unit; end - setfenv(chunk, unit); local success, ret = pcall(chunk); _fakeG.module, _fakeG._M = oldmodule, old_M; if not success then |