Update tests to pass

mitch-niche · Dec 17, 2018 · 3a87f4e · 3a87f4e
1 parent 104080a
commit 3a87f4e
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/tests/testthat/test-bulk.R b/tests/testthat/test-bulk.R
@@ -156,7 +156,7 @@ test_that("testing Bulk 2.0 Functionality", {
                                   "My_External_Id__c", "test_number__c", "sf__Error"))  
   expect_equal(nrow(updated_records), nrow(queried_records))
   expect_true(all(is.na(updated_records$sf__Error)))
-  expect_true(all(updated_records$sf__Created))  
+  expect_true(all(!updated_records$sf__Created))
 
   new_record <- tibble(FirstName = "Test",
                        LastName = paste0("Contact-Upsert-", n+1), 

diff --git a/tests/testthat/test-metadata.R b/tests/testthat/test-metadata.R
@@ -82,7 +82,7 @@ test_that("sf_create_metadata", {
   expect_is(custom_object_result, "tbl_df")
   expect_named(custom_object_result, c('fullName', 'success'))
   expect_equal(nrow(custom_object_result), 1)
-  expect_equal(all(custom_object_result$success))
+  expect_true(all(custom_object_result$success))
 
   expect_is(create_fields_result1, "tbl_df")
   expect_named(create_fields_result1, c('fullName', 'success'))
@@ -99,7 +99,7 @@ test_that("sf_update_metadata", {
   expect_is(updated_custom_object_result, "tbl_df")
   expect_named(updated_custom_object_result, c('fullName', 'success'))
   expect_equal(nrow(updated_custom_object_result), 1)
-  expect_equal(all(updated_custom_object_result$success))
+  expect_true(all(updated_custom_object_result$success))
 })
 
 test_that("sf_rename_metadata", {