develooper Front page | perl.cvs.parrot | Postings from November 2008

[svn:parrot] r32565 - trunk/t/op

From:
particle
Date:
November 11, 2008 14:04
Subject:
[svn:parrot] r32565 - trunk/t/op
Message ID:
20081111220430.4C069CB9AF@x12.develooper.com
Author: particle
Date: Tue Nov 11 14:04:29 2008
New Revision: 32565

Modified:
   trunk/t/op/sysinfo.t

Log:
[t] fix broken skip marker

Modified: trunk/t/op/sysinfo.t
==============================================================================
--- trunk/t/op/sysinfo.t	(original)
+++ trunk/t/op/sysinfo.t	Tue Nov 11 14:04:29 2008
@@ -186,7 +186,8 @@
 
 SKIP:
 {
-    skip 'Testing only in some known platforms' => unless $PConfig{osname} eq 'linux';
+    skip 'Testing only in some known platforms', 1
+        unless $PConfig{osname} eq 'linux';
 
     pir_output_like( <<'CODE', '/^-[1-9][0-9]*\n[1-9][0-9]*\n$/', 'INTVAL min and max values');
 .include 'sysinfo.pasm'



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