Front page | perl.perl5.porters |
Postings from February 2011
On Wed, Feb 09, 2011 at 04:07:37AM -0600, Craig A. Berry wrote:
> lib/vmsish.....................................................FAILED at test 21
Does this fix it?
diff --git a/lib/vmsish.t b/lib/vmsish.t
index fbdca93..41214bb 100644
--- a/lib/vmsish.t
+++ b/lib/vmsish.t
@@ -126,10 +126,7 @@ is($?,0,"outer lex scope of vmsish [POSIX status]");
END { 1 while unlink $file; }
{
- use_ok('vmsish qw(time)');
-
- # but that didn't get it in our current scope
- use vmsish qw(time);
+ BEGIN {use_ok('vmsish', 'time') if $^O eq 'VMS'};
$vmstime = time;
@vmslocal = localtime($vmstime);
If so, sorry about that. I did get all the missing regexps for like()
Nicholas Clark