From: Vincent Pit Date: Mon, 20 Aug 2012 17:07:27 +0000 (+0200) Subject: Silence possible 'used only once' warnings for $VPIT::TestHelpers::TODO X-Git-Tag: v0.930.2~2 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTask-Devel-Cover-Recommended.git;a=commitdiff_plain;h=cfbb22e66b71baa3c39f39d59ec34e6018e476b2 Silence possible 'used only once' warnings for $VPIT::TestHelpers::TODO --- diff --git a/t/lib/VPIT/TestHelpers.pm b/t/lib/VPIT/TestHelpers.pm index 0ac9200..18f2b17 100644 --- a/t/lib/VPIT/TestHelpers.pm +++ b/t/lib/VPIT/TestHelpers.pm @@ -27,6 +27,9 @@ sub diag { Test::More::diag($_) for @_; } +our $TODO; +local $TODO; + sub load_or_skip { my ($pkg, $ver, $imports, $desc) = @_; my $spec = $ver && $ver !~ /^[0._]*$/ ? "$pkg $ver" : $pkg;