projects
/
arvados.git
/ blobdiff
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Implement copy method, update move method and remove trailing
[arvados.git]
/
sdk
/
R
/
tests
/
testthat
/
fakes
/
FakeHttpRequest.R
diff --git
a/sdk/R/tests/testthat/fakes/FakeHttpRequest.R
b/sdk/R/tests/testthat/fakes/FakeHttpRequest.R
index 2ebcda2e4d671dc91cef9ca6ca0cdcb6a2707e18..7734e0d9284d6bde09b478ab30171e687ea75a2c 100644
(file)
--- a/
sdk/R/tests/testthat/fakes/FakeHttpRequest.R
+++ b/
sdk/R/tests/testthat/fakes/FakeHttpRequest.R
@@
-27,6
+27,7
@@
FakeHttpRequest <- R6::R6Class(
numberOfPUTRequests = NULL,
numberOfPOSTRequests = NULL,
numberOfMOVERequests = NULL,
numberOfPUTRequests = NULL,
numberOfPOSTRequests = NULL,
numberOfMOVERequests = NULL,
+ numberOfCOPYRequests = NULL,
numberOfgetConnectionCalls = NULL,
initialize = function(expectedURL = NULL,
numberOfgetConnectionCalls = NULL,
initialize = function(expectedURL = NULL,
@@
-57,6
+58,7
@@
FakeHttpRequest <- R6::R6Class(
self$numberOfPUTRequests <- 0
self$numberOfPOSTRequests <- 0
self$numberOfMOVERequests <- 0
self$numberOfPUTRequests <- 0
self$numberOfPOSTRequests <- 0
self$numberOfMOVERequests <- 0
+ self$numberOfCOPYRequests <- 0
self$numberOfgetConnectionCalls <- 0
self$numberOfgetConnectionCalls <- 0
@@
-81,6
+83,8
@@
FakeHttpRequest <- R6::R6Class(
self$numberOfDELETERequests <- self$numberOfDELETERequests + 1
else if(verb == "MOVE")
self$numberOfMOVERequests <- self$numberOfMOVERequests + 1
self$numberOfDELETERequests <- self$numberOfDELETERequests + 1
else if(verb == "MOVE")
self$numberOfMOVERequests <- self$numberOfMOVERequests + 1
+ else if(verb == "COPY")
+ self$numberOfCOPYRequests <- self$numberOfCOPYRequests + 1
else if(verb == "PROPFIND")
{
return(self$content)
else if(verb == "PROPFIND")
{
return(self$content)