Sort list of allowed methods. RT#81825

[catagits/Catalyst-Action-REST.git] / t / catalyst-traitfor-request-rest-forbrowsers.t

diff --git a/t/catalyst-traitfor-request-rest-forbrowsers.t b/t/catalyst-traitfor-request-rest-forbrowsers.t
index e6ba204..4e36964 100644 (file)
--- a/t/catalyst-traitfor-request-rest-forbrowsers.t
+++ b/t/catalyst-traitfor-request-rest-forbrowsers.t
@@ -8,6 +8,7 @@ use Catalyst::Request::REST::ForBrowsers;
 use Catalyst::TraitFor::Request::REST::ForBrowsers;
 use Moose::Meta::Class;
 use HTTP::Headers;
+use Catalyst::Log;
 
 my $anon_class = Moose::Meta::Class->create_anon_class(
     superclasses => ['Catalyst::Request'],
@@ -20,7 +21,9 @@ my $anon_class = Moose::Meta::Class->create_anon_class(
 for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     {
         for my $method (qw( GET POST PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method($method);
             $req->{_context} = 'MockContext';
             $req->parameters( {} );
@@ -34,7 +37,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $method (qw( PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method('POST');
             $req->{_context} = 'MockContext';
             $req->parameters( { 'x-tunneled-method' => $method } );
@@ -48,7 +53,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $method (qw( PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method('POST');
             $req->{_context} = 'MockContext';
             $req->header( 'x-http-method-override' => $method );
@@ -62,7 +69,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $method (qw( PUT DELETE )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->method('GET');
             $req->{_context} = 'MockContext';
             $req->parameters( { 'x-tunneled-method' => $method } );
@@ -75,7 +84,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -89,7 +100,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
 
     {
         for my $with (qw( HTTP.Request XMLHttpRequest )) {
-            my $req = $class->new();
+            my $req = $class->new(
+                _log => Catalyst::Log->new,
+            );
             $req->{_context} = 'MockContext';
             $req->headers(
                 HTTP::Headers->new( 'X-Requested-With' => $with ) );
@@ -102,7 +115,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( { 'content-type' => 'text/json' } );
@@ -115,7 +130,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( { 'content-type' => 'text/html' } );
@@ -128,7 +145,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -142,7 +161,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -159,7 +180,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );
@@ -176,7 +199,9 @@ for my $class ( $anon_class, 'Catalyst::Request::REST::ForBrowsers' ) {
     }
 
     {
-        my $req = $class->new();
+        my $req = $class->new(
+            _log => Catalyst::Log->new,
+        );
         $req->{_context} = 'MockContext';
         $req->method('GET');
         $req->parameters( {} );