1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
local test_env = require("spec.util.test_env")
local run = test_env.run
local testing_paths = test_env.testing_paths
test_env.unload_luarocks()
local extra_rocks = {
"/say-1.0-1.src.rock",
"/say-1.2-1.src.rock"
}
describe("luarocks list #integration", function()
before_each(function()
test_env.setup_specs(extra_rocks)
end)
it("with no flags/arguments", function()
local output = run.luarocks("list")
assert.match("luacov", output)
end)
it("--porcelain", function()
local output = run.luarocks("list --porcelain")
assert.is.truthy(output:find("luacov\t0.15.0-1\tinstalled\t" .. testing_paths.testing_sys_rocks, 1, true))
end)
it("shows version number", function()
local output = run.luarocks("list")
assert.is.truthy(output:find("luacov"))
assert.matches("0.15.0-1", output, 1, true)
end)
it("LuaRocks install outdated and list it", function()
assert.is_true(run.luarocks_bool("install say 1.0-1"))
local output = run.luarocks("list --outdated")
assert.is.truthy(output:find("say"))
assert.matches("1.0-1 < ", output, 1, true)
end)
it("invalid tree", function()
local output = run.luarocks("--tree=/some/invalid/tree list")
assert(output:find("Rocks installed for Lua "..test_env.lua_version.." in /some/invalid/tree", 1, true))
end)
end)
|