use warnings;
use Test::More tests => 1;
+BEGIN { $ENV{DBIC_OVERWRITE_HELPER_METHODS_OK} = 1; }
+
use_ok('ComponentUI')
or BAIL_OUT('ComponentUI does not compile, giving up');
use warnings;
use Test::More tests => 2;
-BEGIN { use_ok 'Catalyst::Test', 'ComponentUI' }
+BEGIN {
+ local $ENV{DBIC_OVERWRITE_HELPER_METHODS_OK} = 1;
+ use_ok 'Catalyst::Test', 'ComponentUI';
+}
ok( request('/')->is_success, 'Request should succeed' );
use warnings;
use Test::Class;
+BEGIN { $ENV{DBIC_OVERWRITE_HELPER_METHODS_OK} = 1; }
use RTest::InterfaceModel::Reflector::DBIC;
+
Test::Class->runtests(
RTest::InterfaceModel::Reflector::DBIC->new(),
);
use warnings;
use Test::Class;
+
+BEGIN { $ENV{DBIC_OVERWRITE_HELPER_METHODS_OK} = 1; }
+
use RTest::UI::ViewPort::ListView;
Test::Class->runtests(
use strict;
use warnings;
use Test::More qw(no_plan);
+BEGIN { $ENV{DBIC_OVERWRITE_HELPER_METHODS_OK} = 1; }
+
use Test::WWW::Mechanize::Catalyst 'ComponentUI';
my $mech = Test::WWW::Mechanize::Catalyst->new;