add tests for exec and getConnection methods in HttpRequest class

[arvados.git] / sdk / R / R / ArvadosFile.R

diff --git a/sdk/R/R/ArvadosFile.R b/sdk/R/R/ArvadosFile.R
index 8f737831c4634cc09a3121a86e04dcbf0361946b..df323fbc48b2481a97f08160f34d9a8830de1ece 100644 (file)
--- a/sdk/R/R/ArvadosFile.R
+++ b/sdk/R/R/ArvadosFile.R
@@ -144,8 +144,8 @@ ArvadosFile <- R6::R6Class(
             if (rw == "r" || rw == "rb") 
             {
                 REST <- private$collection$getRESTService()
-                return(REST$getConnection(private$collection$uuid,
-                                          self$getRelativePath(),
+                return(REST$getConnection(self$getRelativePath(),
+                                          private$collection$uuid,
                                           rw))
             }
             else if (rw == "w")