45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
global RESULT
upvar $var UUID
fossil status
regexp {checkout:\s+([0-9a-f]{40})} $RESULT m UUID
}
# Make sure we are not in an open repository and initialize new repository
repo_init
########################################
# Setup: Add file and commit #
########################################
if {![uuid_from_checkout UUIDINIT]} {
test amend-checkout-failure false
|
|
|
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
global RESULT
upvar $var UUID
fossil status
regexp {checkout:\s+([0-9a-f]{40})} $RESULT m UUID
}
# Make sure we are not in an open repository and initialize new repository
test_setup
########################################
# Setup: Add file and commit #
########################################
if {![uuid_from_checkout UUIDINIT]} {
test amend-checkout-failure false
|