stop using Moo as a test package
[catagits/Catalyst-Runtime.git] / t / aggregate / unit_core_ctx_attr.t
CommitLineData
950c7852 1use strict;
2use warnings;
3use FindBin qw/$Bin/;
4use lib "$FindBin::Bin/../lib";
5use Test::More;
6use URI;
7
8use_ok('TestApp');
9
10my $request = Catalyst::Request->new( {
7c1c4dc6 11 _log => Catalyst::Log->new,
950c7852 12 base => URI->new('http://127.0.0.1/foo')
13 } );
14my $dispatcher = TestApp->dispatcher;
15my $context = TestApp->new( {
16 request => $request,
17 namespace => 'yada',
18 } );
19
20is( $context->hello_lazy, 'hello there', '$context->hello_lazy');
21eval { is( $context->hello_notlazy, 'hello there', '$context->hello_notlazy') };
56d230bf 22TODO: {
23 local $TODO = 'we appear to have a lazy bug';
24 if ($@) {
25 fail('$context->hello_notlazy');
26 warn $@;
27 }
950c7852 28}
29
30done_testing;
31