Skip Menu |

This queue is for tickets about the Try CPAN distribution.

Report information
The Basics
Id: 117024
Status: new
Priority: 0/
Queue: Try

People
Owner: Nobody in particular
Requestors: TODDR [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 0.03
Fixed in: (no value)



Subject: unit tests emit experimental warnings in newer perls
ib/arch')" t/*.t t/00-compile.t .. ok t/basic.t ....... ok t/context.t ..... ok t/finally.t ..... ok t/given_when.t .. 1/? given is experimental at t/given_when.t line 11. when is experimental at t/given_when.t line 12. t/given_when.t .. ok t/syntax.t ...... ok t/when.t ........ when is experimental at t/when.t line 19. when is experimental at t/when.t line 20. t/when.t ........ ok All tests successful. Test Summary Report ------------------- t/given_when.t (Wstat: 0 Tests: 3 Failed: 0) TODO passed: 3 Files=7, Tests=67, 0 wallclock secs ( 0.05 usr 0.00 sys + 0.41 cusr 0.05 csys = 0.51 CPU) Result: PASS
Suggested patch?
Subject: patch.txt
commit 4246c2d5686e824938b9a15bd92c645c9fbbfdad Author: Todd Rinaldo <toddr@cpan.org> Date: Wed Aug 17 16:18:13 2016 -0500 Disable experimental warnings for given/when unit tests https://rt.cpan.org/Ticket/Display.html?id=117024 diff --git a/t/given_when.t b/t/given_when.t index 3c18e0d..5d63a4d 100644 --- a/t/given_when.t +++ b/t/given_when.t @@ -1,6 +1,8 @@ #!/usr/bin/env perl use strict; use warnings; +no if $] >= 5.018, warnings => 'experimental'; + use Test::More; use 5.014; diff --git a/t/when.t b/t/when.t index 3d9ad62..89b2ea2 100644 --- a/t/when.t +++ b/t/when.t @@ -1,6 +1,8 @@ #!/usr/bin/env perl use strict; use warnings; +no if $] >= 5.018, warnings => 'experimental'; + use Test::More; use 5.014;