summaryrefslogtreecommitdiff
path: root/t/win32
diff options
context:
space:
mode:
authorTony Cook <tony@develop-help.com>2012-08-24 17:42:48 +1000
committerTony Cook <tony@develop-help.com>2012-08-24 17:42:48 +1000
commitc58baf15ae09f5f9fbb600b78e7e4cc568e056c5 (patch)
tree6ffdb07b5d2a76ba6e2a7aaf47f254564ba01050 /t/win32
parent36e77d4126acf84c7d0007ed7c58e004ed3f3600 (diff)
downloadperl-c58baf15ae09f5f9fbb600b78e7e4cc568e056c5.tar.gz
oops, left some debugging code
left from fixing perl #112272
Diffstat (limited to 't/win32')
-rw-r--r--t/win32/fs.t2
1 files changed, 0 insertions, 2 deletions
diff --git a/t/win32/fs.t b/t/win32/fs.t
index cbe697c459..89992c843a 100644
--- a/t/win32/fs.t
+++ b/t/win32/fs.t
@@ -21,7 +21,6 @@ SKIP: {
and skip("somehow, the files exist", 4);
ok(!link($tmpfile1, $tmpfile2),
"Cannot link to unknown file");
- warn $!;
is(0+$!, &Errno::ENOENT, "check errno is ENOENT");
open my $fh, ">", $tmpfile1
or skip("Cannot create test link src", 2);
@@ -31,7 +30,6 @@ SKIP: {
close $fh;
ok(!link($tmpfile1, $tmpfile2),
"Cannot link to existing file");
- warn $!;
is(0+$!, &Errno::EEXIST, "check for EEXIST");
}