|
550
|
1 #!/bin/bash
|
|
|
2
|
|
|
3 set -x
|
|
|
4
|
|
|
5 # No local source
|
|
|
6 hg clone a b
|
|
|
7 echo $?
|
|
|
8
|
|
|
9 # No remote source
|
|
|
10 hg clone http://127.0.0.1:3121/a b
|
|
|
11 echo $?
|
|
|
12 rm -rf b # work around bug with http clone
|
|
|
13
|
|
|
14 # Inaccessible source
|
|
|
15 mkdir a
|
|
|
16 chmod 000 a
|
|
|
17 hg clone a b
|
|
|
18 echo $?
|
|
|
19
|
|
|
20 # Inaccessible destination
|
|
|
21 mkdir b
|
|
|
22 cd b
|
|
|
23 hg init
|
|
|
24 hg clone . ../a
|
|
|
25 echo $?
|
|
|
26 cd ..
|
|
|
27 chmod 700 a
|
|
|
28 rm -rf a b
|
|
|
29
|
|
|
30 # Source of wrong type
|
|
|
31 mkfifo a
|
|
|
32 hg clone a b
|
|
|
33 echo $?
|
|
|
34 rm a
|
|
|
35
|
|
|
36 # Default destination, same directory
|
|
|
37 mkdir q
|
|
|
38 cd q
|
|
|
39 hg init
|
|
|
40 cd ..
|
|
|
41 hg clone q
|
|
|
42
|
|
|
43 true
|
