diff --git a/lemonldap-ng-portal/t/test-lib.pm b/lemonldap-ng-portal/t/test-lib.pm index 9995af7a8..32f194e90 100644 --- a/lemonldap-ng-portal/t/test-lib.pm +++ b/lemonldap-ng-portal/t/test-lib.pm @@ -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 )