File Coverage

blib/lib/Test/Mock/Furl/Request.pm

Criterion	Covered	Total	%
statement	16	17	94.1
branch			n/a
condition			n/a
subroutine	6	7	85.7
pod	1	1	100.0
total	23	25	92.0

package Test::Mock::Furl::Request;
use strict;
use warnings;
use Test::MockObject;
use parent 'Exporter';
our @EXPORT = qw/$Mock_furl_req $Mock_furl_request/;

our $Mock_furl_req;
our $Mock_furl_request;

BEGIN {
    $Mock_furl_request = $Mock_furl_req = Test::MockObject->new;
    $Mock_furl_req->fake_module(
        'Furl::Request',
        new => sub {
            $Mock_furl_req->{new_args} = [@_];
            $Mock_furl_req;
        }
    );
}

$Mock_furl_req->set_always('authorization_basic' => '');
$Mock_furl_req->set_always('header' => '');
$Mock_furl_req->set_always('content' => '');

sub new {
    $Mock_furl_req;
};

$Mock_furl_req->mock(
    '-new_args' => sub {
        delete $Mock_furl_req->{new_args};
    },
);

package # hide from PAUSE
    Furl::Request;

our $VERSION = 'Mocked';

1;

__END__