File: __driver__.lua

package info (click to toggle)
monotone 1.0-6
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 20,708 kB
  • sloc: cpp: 84,765; sh: 6,787; perl: 837; makefile: 833; python: 517; lisp: 379; sql: 118; exp: 88; ansic: 52
file content (55 lines) | stat: -rw-r--r-- 1,731 bytes parent folder | download | duplicates (6)
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"})