diff options
Diffstat (limited to 'test/unit/_tilde.exp')
| -rw-r--r-- | test/unit/_tilde.exp | 53 |
1 files changed, 0 insertions, 53 deletions
diff --git a/test/unit/_tilde.exp b/test/unit/_tilde.exp deleted file mode 100644 index e313dcae..00000000 --- a/test/unit/_tilde.exp +++ /dev/null @@ -1,53 +0,0 @@ -proc setup {} { - save_env -} - -proc teardown {} { - assert_env_unmodified { - /COMPREPLY=/d - } -} - - -setup - - -set test "function should run without errors" -assert_bash_exec {_tilde > /dev/null} $test -sync_after_int - -set test "function should not pollute environment" -# NOTE: A possible environment pollution is detected by assert_env_modified() in teardown() -assert_bash_exec {foo() { local aa="~"; _tilde "$aa"; }; foo; unset foo} $test -sync_after_int - -set failed_find_unique_completion 0 -assert_bash_exec {compgen -u} {} /@ users -if {![find_unique_completion_pair $users part full]} { - set failed_find_unique_completion 1 -} - -set test "~full should complete to ~full unmodified" -if {$failed_find_unique_completion} { - untested "Not running, no suitable test user found: $test" -} else { - set cmd [format {_tilde "~%s"; printf "%%s\n" "${COMPREPLY[@]}"} $full] - assert_bash_list "~$full" $cmd $test - sync_after_int -} - -set test "~part should complete to ~full" -if {$failed_find_unique_completion} { - untested "Not running, no suitable test user found: $test" -} else { - set cmd [format {_tilde "~%s"; printf "%%s\n" "${COMPREPLY[@]}"} $part] - assert_bash_list "~$full" $cmd $test - sync_after_int -} - -# Debian #766163 -assert_no_complete "_tilde ~-o" -sync_after_int - - -teardown |