Fix dependency on enum being uppercase (#310)

Azure · Sep 13, 2018 · 81dcb72 · 81dcb72
1 parent 4020a93
commit 81dcb72
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/utility-job.R b/R/utility-job.R
@@ -557,7 +557,7 @@ waitForTasksToComplete <-
           next
         }
 
-        if (mergeTask$executionInfo$result == "Success") {
+        if (tolower(mergeTask$executionInfo$result) == "success") {
           cat(" Completed.")
           break
         }
@@ -601,7 +601,7 @@ waitForJobPreparation <- function(jobId, poolId) {
     )
 
     statuses <- sapply(statuses$value, function(x) {
-      x$jobPreparationTaskExecutionInfo$result == "Success"
+      tolower(x$jobPreparationTaskExecutionInfo$result) == "success"
     })
 
     if (TRUE %in% statuses) {