From 0f62237209f04103c72a3212061075c95996b769 Mon Sep 17 00:00:00 2001 From: Slaven Rezic Date: Sat, 14 Jun 2014 13:31:40 +0200 Subject: [PATCH] Make a problematic test a TODO test This is a workaround for https://rt.cpan.org/Ticket/Display.html?id=95192 Also, to be able to use TODO tests at all, Test::Simple was replaced by Test::More. --- t/00.t | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/t/00.t b/t/00.t index 853ea2d..5f57622 100644 --- a/t/00.t +++ b/t/00.t @@ -1,4 +1,4 @@ -use Test::Simple 'no_plan'; +use Test::More 'no_plan'; use strict; use lib './lib'; use Cwd; @@ -54,7 +54,9 @@ for (@devs){ } print STDERR "\n\n"; my $count = scalar @devswithp; +{ local $TODO = "This is not true for ZFS and possible other systems"; ok( $count, "found at least one dev with a mount point: @devswithp"); +} -- 1.9.0