use warnings FATAL => 'all';
no warnings::illegalproto;
-use Test::More;
+use Test::More 0.88;
use HTTP::Request::Common qw(GET POST);
use Web::Dispatch;
use strictures;
-use Test::More;
+use Test::More 0.88;
plan skip_all => 'No Devel::Cycle' unless eval { require Devel::Cycle; 1 };
use strictures 1;
-use Test::More;
+use Test::More 0.88;
{
package t::Web::Simple::MatchHome;
use strictures;
-use Test::More;
+use Test::More 0.88;
use Web::Simple::Application;
use Socket;
use strictures 1;
-use Test::More;
+use Test::More 0.88;
use Plack::Test;
use HTTP::Request::Common qw(GET POST);
use strict;
use warnings FATAL => 'all';
-use Test::More;
+use Test::More 0.88;
{
package BazRole;
use strictures 1;
-use Test::More;
+use Test::More 0.88;
{
package TestApp;
use strictures 1;
-use Test::More;
+use Test::More 0.88;
my $auth_result;
my @auth_args;
use Web::Simple 'TestApp';
-use Test::More;
+use Test::More 0.88;
sub TestApp::dispatch_request {
sub (GET + ?*) {
use strictures 1;
-use Test::More;
+use Test::More 0.88;
{
package t::Web::Simple::HTTPMethods;