From: Tomas Doran Date: Fri, 19 Jun 2009 20:39:58 +0000 (+0000) Subject: Remove Test::MockObject X-Git-Tag: 5.80014_02~147 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=a785d733cc1b0485a2378556db04333794a738ae Remove Test::MockObject --- diff --git a/t/unit_core_setup.t b/t/unit_core_setup.t index 1e6e572..00ee842 100644 --- a/t/unit_core_setup.t +++ b/t/unit_core_setup.t @@ -1,5 +1,6 @@ use strict; use warnings; +use Class::MOP::Class; use Catalyst::Runtime; use Test::More tests => 29; @@ -67,13 +68,13 @@ local %ENV; # Don't allow env variables to mess us up. ok $log->is_debug, 'Debugging should be enabled'; ok !$c->debug, 'Catalyst debugging turned off'; } +my $log_meta = Class::MOP::Class->create_anon_class( + methods => { map { $_ => sub { 0 } } qw/debug error fatal info warn/ }, +); { package MyTestAppWithOwnLogger; use base qw/Catalyst/; - use Test::MockObject; - my $log = Test::MockObject->new; - $log->set_false(qw/debug error fatal info warn/); - __PACKAGE__->log($log); + __PACKAGE__->log($log_meta->new_object); __PACKAGE__->setup('-Debug'); }