summaryrefslogtreecommitdiff
path: root/tests/rm/fail-eperm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/rm/fail-eperm')
-rwxr-xr-xtests/rm/fail-eperm7
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/rm/fail-eperm b/tests/rm/fail-eperm
index e2ce957eb..9bf0bfc05 100755
--- a/tests/rm/fail-eperm
+++ b/tests/rm/fail-eperm
@@ -59,7 +59,6 @@ delete @ENV{qw(BASH_ENV CDPATH ENV PATH)};
$ENV{IFS} = '';
my @dir_list = qw(/tmp /var/tmp /usr/tmp);
-my $rm = '../../src/rm';
# Find a directory with the sticky bit set.
my $found_dir;
@@ -96,8 +95,8 @@ foreach my $dir (@dir_list)
# Invoke rm on this file and ensure that we get the
# expected exit code and diagnostic.
- my $cmd = "$rm -f -- $target_file";
- open RM, "$cmd 2>&1 |"
+ my $cmd = "rm -f -- $target_file";
+ open RM, "PATH=../../src $cmd 2>&1 |"
or die "$ME: cannot execute `$cmd'\n";
my $line = <RM>;
@@ -118,7 +117,7 @@ foreach my $dir (@dir_list)
die "$ME: command `$cmd' died with signal $sig_num\n";
}
- my $exp = "$rm: cannot remove `$target_file':";
+ my $exp = "rm: cannot remove `$target_file':";
$line
or die "$ME: no output from `$cmd';\n"
. "expected something like `$exp ...'\n";