projects
/
arvados.git
/ blobdiff
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch '12840-cancelled-pipeline'
[arvados.git]
/
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 bd46b49283fa87911ae366520c96e0fee8d8181f..865234d83552db7965f1d4077085a9f83c65ec4e 100644
(file)
--- 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
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
serverResponse
},
getFileSizesFromResponse = function(serverResponse, uri)
{
self$parserCallCount <- self$parserCallCount + 1
+
+ if(!is.null(serverResponse$content))
+ return(serverResponse$content)
+
serverResponse
}
)
serverResponse
}
)