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
|
proc setup {} {
save_env
}
proc teardown {} {
assert_env_unmodified {/OLDPWD=/d}
}
setup
assert_complete_any "time set"
sync_after_int
set test "-p find -typ should complete find's options"
assert_complete "-type" "time -p find -typ" $test
sync_after_int
set test "it should be possible to complete file paths"
set dir $::srcdir/fixtures/shared
set files [split [exec bash -c "cd $dir/bin && ls -p"] "\n"]
assert_complete_dir $files "time ./bin/" $dir $test
sync_after_int
teardown
|
