develooper Front page | perl.perl5.porters | Postings from April 2007

[PATCH lib/ExtUtils/t/MM_Unix.t] Fix warning.

Thread Next
From:
Abigail
Date:
April 23, 2007 15:37
Subject:
[PATCH lib/ExtUtils/t/MM_Unix.t] Fix warning.
Message ID:
20070423223715.GB544@abigail.nl

Running this test resulted in a warning:

  Argument "1.52_03" isn't numeric in addition (+) at lib/Test/Builder.pm

This patch makes fixes it.


Abigail


--- lib/ExtUtils/t/MM_Unix.t.orig	2007-04-24 00:32:03.000000000 +0200
+++ lib/ExtUtils/t/MM_Unix.t	2007-04-24 00:32:41.000000000 +0200
@@ -37,7 +37,9 @@
 	+ ($ExtUtils::MM_Unix::Is_VMS   || 0); 
 ok ( $os <= 1,  'There can be only one (or none)');
 
-cmp_ok ($ExtUtils::MM_Unix::VERSION, '>=', '1.12606', 'Should be at least version 1.12606');
+my $version = $ExtUtils::MM_Unix::VERSION;
+   $version =~ s/_//g;
+cmp_ok ($version, '>=', '1.12606', 'Should be at least version 1.12606');
 
 # when the following calls like canonpath, catdir etc are replaced by
 # File::Spec calls, the test's become a bit pointless

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About