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 46 47 48 49 50 51 52 53 54 55
|
skip_if(not existsonpath("test"))
mtn_setup()
check(get("ignore_hook.lua"))
--no args
check(mtn("mkdir"), 2, false, false)
--base functionality
check(mtn("mkdir", "testing"), 0, false, false)
check({"test", "-d", "testing"})
--error if already exists
check(mtn("mkdir", "testing"), 1, false, false)
--nested
check(mtn("mkdir", "testing2/nested"), 0, false, false)
check ({"test", "-d", "testing2/nested"})
--nested, parent exists
check(mtn("mkdir", "testing/nested"), 0, false, false)
check ({"test", "-d", "testing/nested"})
--multiple
check(mtn("mkdir", "test1", "test2"), 0, false, false)
check({"test", "-d", "test1"})
check({"test", "-d", "test2"})
--multiple, nested
check(mtn("mkdir", "testing1/test1", "testing2/test2"), 0, false, false)
check({"test", "-d", "testing1/test1"})
check({"test", "-d", "testing2/test2"})
--multiple, nested, same parent
check(mtn("mkdir", "testing3/test1", "testing3/test2"), 0, false, false)
check({"test", "-d", "testing3/test1"})
check({"test", "-d", "testing3/test2"})
--multiple w/some pre-existing
check(mtn("mkdir", "test1", "test3"), 1, false, false)
check({"test", "-d", "test3"}, 1, false, false)
--ignore feature
check(mtn("--rcfile=ignore_hook.lua", "mkdir", "testing4"), 1, false, false)
check({"test", "-d", "testing4"}, 1, false, false)
--multiple with some ignored (all should fail, workspace should be unchanged)
check(mtn("--rcfile=ignore_hook.lua", "mkdir", "testing4", "testing5"), 1, false, false)
check({"test", "-d", "testing4"}, 1, false, false)
check({"test", "-d", "testing5"}, 1, false, false)
--not respecting ignore
check(mtn("--no-respect-ignore", "--rcfile=ignore_hook.lua", "mkdir", "testing4"), 0, false, false)
check({"test", "-d", "testing4"})
|