Revert test-lib (#1851)
This commit is contained in:
parent
81aa2fb37b
commit
05cb1e1c91
|
@ -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 )
|
||||
|
|
Loading…
Reference in New Issue
Block a user