Skip Menu |

This queue is for tickets about the PerlIO-via-symlink CPAN distribution.

Report information
The Basics
Id: 11288
Status: resolved
Priority: 0/
Queue: PerlIO-via-symlink

People
Owner: Nobody in particular
Requestors: sommerfeld [...] sun.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.03
Fixed in: (no value)



Subject: 2basic 7 & 9 fail spuriously on solaris due to different word choice in error message.
solaris's system error string for EBADF is "Bad file number" rather than "Bad file descriptor", resulting in two spurious test failures. it's simple to fix it to change both. *** 2basic.t.~1~ Wed Nov 10 08:33:32 2004 --- 2basic.t Sun Jan 30 11:38:13 2005 *************** *** 33,39 **** ok ($@ =~ m'Invalid argument'); open $fh, '<:via(symlink)', $fname; ! ok ($! =~ m'Bad file descriptor'); eval { open my $fh, '>:via(symlink)', $fname or die $!; --- 33,39 ---- ok ($@ =~ m'Invalid argument'); open $fh, '<:via(symlink)', $fname; ! ok ($! =~ m'Bad file (number|descriptor)'); eval { open my $fh, '>:via(symlink)', $fname or die $!; *************** *** 44,47 **** ok ($@ =~ m'File exists'); open $fh, '<:via(symlink)', $fname; ! ok ($! =~ m'Bad file descriptor'); --- 44,47 ---- ok ($@ =~ m'File exists'); open $fh, '<:via(symlink)', $fname; ! ok ($! =~ m'Bad file (number|descriptor)');