diff options
author | Tony Cook <tony@develop-help.com> | 2016-11-15 14:42:52 +1100 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2016-11-15 14:42:52 +1100 |
commit | 622584734f799751a284558aaebad21acd3270bf (patch) | |
tree | 68065fb39deeccdbbee975bc26a0bfb3cb38bcc9 /t/io/fs.t | |
parent | 45bbc013ffb5816b9483592845928fa0efc8f0ff (diff) | |
download | perl-622584734f799751a284558aaebad21acd3270bf.tar.gz |
Revert "Do not try to fchown() to uid -1 and gid -1."
This reverts commit c4f643b9fca4c4487ef74e4e6cd5b61a26025698, which
fixed a failure introduced by commit
f95ba548a286b17c260cc168715a9d0d441b14a6 which was reverted in
dd1dbff095629118e73a48a2a6008f03418a07f6.
(uid_t)(-1) and (gid_t)(-1) are perfectly valid parameters to
chown()/fchown() back to POSIX.1-2001 at least.
Diffstat (limited to 't/io/fs.t')
-rw-r--r-- | t/io/fs.t | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -211,14 +211,14 @@ SKIP: { SKIP: { skip "no fchown", 3 unless ($Config{d_fchown} || "") eq "define"; open(my $fh, "<", "a"); - is(chown($<, $(, $fh), 1, "fchown"); + is(chown(-1, -1, $fh), 1, "fchown"); # [perl #122703] # chown() behaved correctly, but there was no test for the chown() # on closed handle case close $fh; $! = 0; - ok(!chown($<, $(, $fh), "chown on closed handle fails"); + ok(!chown(-1, -1, $fh), "chown on closed handle fails"); isnt($!+0, 0, "and errno was set"); } |