X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FTest.pm;h=65cdbd8b3cf3ec036f9d120c58ad881b406be4ca;hp=ba10ffc06db3c9ea97bc2e267d2c8ab734fb4479;hb=1a667b7c025ad99457b34ecdeb9158a3986d3946;hpb=e8d0f69a4f830417edd8c13c6474d0856336c2d4 diff --git a/lib/Catalyst/Test.pm b/lib/Catalyst/Test.pm index ba10ffc..65cdbd8 100644 --- a/lib/Catalyst/Test.pm +++ b/lib/Catalyst/Test.pm @@ -2,14 +2,14 @@ package Catalyst::Test; use Test::More; -use strict; -use warnings; +use Moose; use Catalyst::Exception; use Catalyst::Utils; use Class::Inspector; -use parent qw/Exporter/; +extends 'Exporter'; + our @EXPORT=qw/&content_like &action_ok &action_redirect &action_notfound &contenttype_is/; @@ -230,7 +230,7 @@ sub content_like { no strict 'refs'; my $get=*{"$caller\::get"}; my $action=shift; - return Test::More->builder->like(get($action),@_); + return Test::More->builder->like(&$get($action),@_); } sub action_ok {