aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--R/pkg/R/SQLContext.R4
-rw-r--r--R/pkg/R/sparkR.R2
2 files changed, 3 insertions, 3 deletions
diff --git a/R/pkg/R/SQLContext.R b/R/pkg/R/SQLContext.R
index 110117a18c..1bc6445311 100644
--- a/R/pkg/R/SQLContext.R
+++ b/R/pkg/R/SQLContext.R
@@ -201,7 +201,7 @@ setMethod("toDF", signature(x = "RDD"),
jsonFile <- function(sqlContext, path) {
# Allow the user to have a more flexible definiton of the text file path
- path <- normalizePath(path)
+ path <- suppressWarnings(normalizePath(path))
# Convert a string vector of paths to a string containing comma separated paths
path <- paste(path, collapse = ",")
sdf <- callJMethod(sqlContext, "jsonFile", path)
@@ -251,7 +251,7 @@ jsonRDD <- function(sqlContext, rdd, schema = NULL, samplingRatio = 1.0) {
# TODO: Implement saveasParquetFile and write examples for both
parquetFile <- function(sqlContext, ...) {
# Allow the user to have a more flexible definiton of the text file path
- paths <- lapply(list(...), normalizePath)
+ paths <- lapply(list(...), function(x) suppressWarnings(normalizePath(x)))
sdf <- callJMethod(sqlContext, "parquetFile", paths)
dataFrame(sdf)
}
diff --git a/R/pkg/R/sparkR.R b/R/pkg/R/sparkR.R
index e83104f116..3c57a44db2 100644
--- a/R/pkg/R/sparkR.R
+++ b/R/pkg/R/sparkR.R
@@ -160,7 +160,7 @@ sparkR.init <- function(
})
if (nchar(sparkHome) != 0) {
- sparkHome <- normalizePath(sparkHome)
+ sparkHome <- suppressWarnings(normalizePath(sparkHome))
}
sparkEnvirMap <- new.env()