Add a validate statement for local SparkR

prabeesh · Jul 22, 2015 · b1f19ed · b1f19ed
1 parent 1a03987
commit b1f19ed
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/dev/lint-r.R b/dev/lint-r.R
@@ -24,9 +24,12 @@ if ("lintr" %in% row.names(installed.packages())  == FALSE) {
   devtools::install_github("jimhester/lintr")
 }
 
-# NOTE: You should install SparkR with `R/install-dev.sh` before running this script.
 library(lintr)
+library(methods)
 library(testthat)
-library(SparkR, lib.loc = file.path(SPARK_ROOT_DIR, "R", "lib"))
+if (! library(SparkR, lib.loc = file.path(SPARK_ROOT_DIR, "R", "lib"), logical.return = TRUE)) {
+  stop("You should install SparkR in a local directory with `R/instlal-dev.sh`.")
+}
+
 path.to.package <- file.path(SPARK_ROOT_DIR, "R", "pkg")
 lint_package(path.to.package, cache = FALSE)