Fix bugs

bassel-zeidan · bassel-zeidan · commit e4ce93754a0b · 2017-10-04T19:37:40.000+02:00
diff --git a/r/sparkr/R/osconfig.R b/r/sparkr/R/osconfig.R
@@ -159,7 +159,7 @@ CloudObjectStorage <- setRefClass("CloudObjectStorage",
               SparkR:::callJMethod(hConf, "set", paste(prefix, "iam.token", sep='.'), credentials['iamToken'][[1]])
             }
 
-            if ("iamServiceEndpoint" %in% credentials {
+            if ("iamServiceEndpoint" %in% credentials) {
               SparkR:::callJMethod(hConf, "set", paste(prefix, "iam.endpoint", sep='.'), credentials['iamServiceEndpoint'][[1]])
             }
 
@@ -182,7 +182,7 @@ CloudObjectStorage <- setRefClass("CloudObjectStorage",
         # check the existence of all required values in credentials
         for (key in requiredKeys) {
           if (!key %in% credentials) {
-              stop("Invalid input: missing required input [" + key + "]!")
+              stop(paste("Invalid input: missing required input [", key, "]!", sep=''))
           }
         }
       },

Original file line number	Diff line number	Diff line change
`@@ -159,7 +159,7 @@ CloudObjectStorage <- setRefClass("CloudObjectStorage",`
`159`	`159`	`SparkR:::callJMethod(hConf, "set", paste(prefix, "iam.token", sep='.'), credentials['iamToken'][[1]])`
`160`	`160`	`}`
`161`	`161`
`162`		`- if ("iamServiceEndpoint" %in% credentials {`
	`162`	`+ if ("iamServiceEndpoint" %in% credentials) {`
`163`	`163`	`SparkR:::callJMethod(hConf, "set", paste(prefix, "iam.endpoint", sep='.'), credentials['iamServiceEndpoint'][[1]])`
`164`	`164`	`}`
`165`	`165`
`@@ -182,7 +182,7 @@ CloudObjectStorage <- setRefClass("CloudObjectStorage",`
`182`	`182`	`# check the existence of all required values in credentials`
`183`	`183`	`for (key in requiredKeys) {`
`184`	`184`	`if (!key %in% credentials) {`
`185`		`- stop("Invalid input: missing required input [" + key + "]!")`
	`185`	`+ stop(paste("Invalid input: missing required input [", key, "]!", sep=''))`
`186`	`186`	`}`
`187`	`187`	`}`
`188`	`188`	`},`