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 (33 lines) | stat: -rw-r--r-- 1,118 bytes parent folder | download | duplicates (5)
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
mtn_setup()

writefile("file1", "file1")
check(mtn("add", "file1"), 0, false, false)
check(mtn("commit", "-m", "test1", "--author", "tester1@test.net"), 0, false, true)

writefile("file1", "file1x")
check(mtn("commit", "-m", "test2",  "--author", "<tester2@test.net>"), 0, false, true)

writefile("file1", "file1y")
check(mtn("commit", "-m", "test3",  "--author", "tester3"), 0, false, true)

writefile("file1", "file1z")
check(mtn("commit", "-m", "test4",  "--author", "tester4 <tester@test.net>"), 0, false, true)

check(mtn("log"), 0, true, false)

-- export the monotone history

check(mtn("git_export"), 0, true, true)
check(qgrep("committer tester <tester@test.net>", "stdout"))
check(qgrep("author tester1 <tester1@test.net>", "stdout"))
check(qgrep("author tester2 <tester2@test.net>", "stdout"))
check(qgrep("author tester3 <tester3>", "stdout"))
check(qgrep("author tester4 <tester@test.net>", "stdout"))

-- one more commit with an invalid author

writefile("file1", "file1zz")
check(mtn("commit", "-m", "test4",  "--author", "<tester5@test.net"), 0, false, true)

check(mtn("git_export"), 1, false, true)