Revert test-lib (#1851)

This commit is contained in:
Christophe Maudoux 2019-07-22 15:39:04 +02:00
parent 81aa2fb37b
commit 05cb1e1c91

View File

@ -667,19 +667,6 @@ sub _get {
'SERVER_NAME' => 'auth.example.com',
'SERVER_PORT' => '80',
'SERVER_PROTOCOL' => 'HTTP/1.1',
(
$args{body}
? (
'psgi.input' => $args{body},
'psgix.input.buffered' => 0,
'CONTENT_LENGTH' => $args{length}
// scalar( ( stat $args{body} )[7] ),
'CONTENT_TYPE' => $args{type}
|| 'application/x-www-form-urlencoded',
)
: ()
),
( $args{custom} ? %{ $args{custom} } : () ),
}
);
@ -750,9 +737,7 @@ Call C<_get()> with method set to DELETE.
sub _delete {
my ( $self, $path, %args ) = @_;
$args{method} = 'DELETE';
return $args{body}
? $self->_post( $path, $args{body}, %args )
: $self->_get( $path, %args );
$self->_get( $path, %args );
}
=head4 _put( $path, $body, %args )