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

[PATCH] warning fix for Test-Simple test

From:
Slaven Rezic
Date:
April 13, 2003 11:35
Subject:
[PATCH] warning fix for Test-Simple test
Message ID:
877k9yb62f.fsf@vran.herceg.de
This fixes the

lib/Test/Simple/t/todo...............Argument "2.27_04" isn't numeric in numeric lt (<) at ../lib/Test/Simple/t/todo.t line 14.

warning.

--- bleedperl/lib/Test/Simple/t/todo.t	Fri Jan 11 15:29:18 2002
+++ bleedperl2/lib/Test/Simple/t/todo.t	Sun Apr 13 20:30:53 2003
@@ -11,7 +11,7 @@ BEGIN {
     require Test::Harness;
     use Test::More;
 
-    if( $Test::Harness::VERSION < 1.23 ) {
+    if( eval { !Test::Harness->VERSION(1.23) } ) {
         plan skip_all => 'Need Test::Harness 1.23 or up';
     }
     else {

-- 
Slaven Rezic - slaven@rezic.de

    tkruler - Perl/Tk program for measuring screen distances
    http://ptktools.sourceforge.net/#tkruler



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