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'],
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( {} );
{
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 } );
{
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 );
{
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 } );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( {} );
{
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 ) );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( { 'content-type' => 'text/json' } );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( { 'content-type' => 'text/html' } );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( {} );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( {} );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( {} );
}
{
- my $req = $class->new();
+ my $req = $class->new(
+ _log => Catalyst::Log->new,
+ );
$req->{_context} = 'MockContext';
$req->method('GET');
$req->parameters( {} );