37 lines
508 B
Plaintext
37 lines
508 B
Plaintext
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
|