diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-07 23:01:16 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-07 23:01:16 +0000 |
| commit | 644a288060ff8d01051c5c7e2f4f9f49a69a8eab (patch) | |
| tree | 39d0b0ee8de15d0e314e701c70613cf17b33ea3c /t/op/filetest.t | |
| parent | e8c223dfc7b1035dd59e72c90f29f3f8b0634423 (diff) | |
| download | perl-644a288060ff8d01051c5c7e2f4f9f49a69a8eab.tar.gz | |
Integrate with Sarathy. perldiag.pod required manual editing.
p4raw-id: //depot/cfgperl@3657
Diffstat (limited to 't/op/filetest.t')
| -rw-r--r-- | t/op/filetest.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/t/op/filetest.t b/t/op/filetest.t index 1e095be7e1..66eaa3933d 100644 --- a/t/op/filetest.t +++ b/t/op/filetest.t @@ -35,7 +35,10 @@ eval '$> = 1'; # so switch uid (may not be implemented) print "# oldeuid = $oldeuid, euid = $>\n"; -if ($bad_chmod) { +if (!$Config{d_seteuid}) { + print "ok 6 #skipped, no seteuid\n"; +} +elsif ($bad_chmod) { print "#[$@]\nok 6 #skipped\n"; } else { |