diff options
author | Tony Cook <tony@develop-help.com> | 2012-08-24 17:42:48 +1000 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2012-08-24 17:42:48 +1000 |
commit | c58baf15ae09f5f9fbb600b78e7e4cc568e056c5 (patch) | |
tree | 6ffdb07b5d2a76ba6e2a7aaf47f254564ba01050 /t/win32 | |
parent | 36e77d4126acf84c7d0007ed7c58e004ed3f3600 (diff) | |
download | perl-c58baf15ae09f5f9fbb600b78e7e4cc568e056c5.tar.gz |
oops, left some debugging code
left from fixing perl #112272
Diffstat (limited to 't/win32')
-rw-r--r-- | t/win32/fs.t | 2 |
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"); } |