Fix two other absolute paths I missed

kszucs · Sep 24, 2019 · 1775a6d · 1775a6d
1 parent 0dce0d7
commit 1775a6d
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/r/R/filesystem.R b/r/R/filesystem.R
@@ -205,11 +205,11 @@ FileSystem <- R6Class("FileSystem", inherit = Object,
     },
 
     Move = function(src, dest) {
-      fs___FileSystem__Move(self, clean_path(src), fs_relative_path(dest))
+      fs___FileSystem__Move(self, fs_relative_path(src), fs_relative_path(dest))
     },
 
     CopyFile = function(src, dest) {
-      fs___FileSystem__CopyFile(self, clean_path(src), fs_relative_path(dest))
+      fs___FileSystem__CopyFile(self, fs_relative_path(src), fs_relative_path(dest))
     },
 
     OpenInputStream = function(path) {

diff --git a/r/tests/testthat/test-filesystem.R b/r/tests/testthat/test-filesystem.R
@@ -15,7 +15,7 @@
 # specific language governing permissions and limitations
 # under the License.
 
-context("test-type")
+context("File system")
 
 test_that("LocalFilesystem", {
   fs <- LocalFileSystem$create()