Don't depend on Class::Data::Inheritable and NEXT.

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Test.pm

diff --git a/lib/Catalyst/Test.pm b/lib/Catalyst/Test.pm
index ba10ffc..65cdbd8 100644 (file)
--- 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 {