summaryrefslogtreecommitdiff
path: root/t/win32
diff options
context:
space:
mode:
authorBrad Gilbert <b2gills@gmail.com>2012-12-26 14:46:49 -0600
committerTony Cook <tony@develop-help.com>2013-01-23 20:26:39 +1100
commit4eb3570cf75ab76f2621885bd7fb4ed49edfd2bb (patch)
tree47da94ea2e29483da09476ed19553e3cdeb2bb10 /t/win32
parent6428272954846b6f268c5ccfae980f9c90424939 (diff)
downloadperl-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.t10
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);
-}