X-Git-Url: https://git.arvados.org/arvados.git/blobdiff_plain/2d451314078739464fbb754791bf6f1d4a8fad1c..5d164d74505c232cfa232d69a56273da2d02b72a:/sdk/R/tests/testthat/fakes/FakeHttpParser.R diff --git a/sdk/R/tests/testthat/fakes/FakeHttpParser.R b/sdk/R/tests/testthat/fakes/FakeHttpParser.R index bd46b49283..865234d835 100644 --- a/sdk/R/tests/testthat/fakes/FakeHttpParser.R +++ b/sdk/R/tests/testthat/fakes/FakeHttpParser.R @@ -36,12 +36,20 @@ FakeHttpParser <- R6::R6Class( getFileNamesFromResponse = function(serverResponse, uri) { self$parserCallCount <- self$parserCallCount + 1 + + if(!is.null(serverResponse$content)) + return(serverResponse$content) + serverResponse }, getFileSizesFromResponse = function(serverResponse, uri) { self$parserCallCount <- self$parserCallCount + 1 + + if(!is.null(serverResponse$content)) + return(serverResponse$content) + serverResponse } )