diff options
author | Brad Gilbert <b2gills@gmail.com> | 2012-12-26 14:46:49 -0600 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2013-01-23 20:26:39 +1100 |
commit | 4eb3570cf75ab76f2621885bd7fb4ed49edfd2bb (patch) | |
tree | 47da94ea2e29483da09476ed19553e3cdeb2bb10 /t/win32 | |
parent | 6428272954846b6f268c5ccfae980f9c90424939 (diff) | |
download | perl-4eb3570cf75ab76f2621885bd7fb4ed49edfd2bb.tar.gz |
Remove dead code from t/win32/fs.t
tempfile() from t/test.pl already handles checking for existing files
and removing them at the end of the test.
This test also doesn't need Config loaded
Diffstat (limited to 't/win32')
-rw-r--r-- | t/win32/fs.t | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/t/win32/fs.t b/t/win32/fs.t index 89992c843a..b62135ddb0 100644 --- a/t/win32/fs.t +++ b/t/win32/fs.t @@ -8,17 +8,12 @@ BEGIN { die $@ if $@ and !is_miniperl(); } -use Config; - plan tests => 4; my $tmpfile1 = tempfile(); my $tmpfile2 = tempfile(); -SKIP: { # RT #112272 - -e $tmpfile1 || -e $tmpfile2 - and skip("somehow, the files exist", 4); ok(!link($tmpfile1, $tmpfile2), "Cannot link to unknown file"); is(0+$!, &Errno::ENOENT, "check errno is ENOENT"); @@ -31,8 +26,3 @@ SKIP: { ok(!link($tmpfile1, $tmpfile2), "Cannot link to existing file"); is(0+$!, &Errno::EEXIST, "check for EEXIST"); -} - -END { - unlink($tmpfile1, $tmpfile2); -} |