From eafe3ee7f03ac9da69aea4671a914f6ec8ddbe91 Mon Sep 17 00:00:00 2001 From: jennybc Date: Fri, 19 Jun 2015 11:13:52 -0700 Subject: [PATCH] explicitly simplify test input dplyr went from 0.4.1 to 0.4.2 and bind_cols() now returns tbl_df --> the ws component of googlesheet objects is now a tbl_df --> must use `[[` to explicitly simplify and get single element for this comparison --- tests/testthat/test-ws-edits.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/tests/testthat/test-ws-edits.R b/tests/testthat/test-ws-edits.R index 95ddf09..9bf7d6d 100644 --- a/tests/testthat/test-ws-edits.R +++ b/tests/testthat/test-ws-edits.R @@ -15,9 +15,9 @@ test_that("Add a new worksheet", { new_ws_index <- ss_before$n_ws + 1 expect_equal(new_ws_index, ss_after$n_ws) - expect_equal(ss_after$ws[new_ws_index, "row_extent"], 7L) - expect_equal(ss_after$ws[new_ws_index, "col_extent"], 5L) - expect_equal(ss_after$ws[new_ws_index, "ws_title"], "Test Sheet") + expect_equal(ss_after$ws[[new_ws_index, "row_extent"]], 7L) + expect_equal(ss_after$ws[[new_ws_index, "col_extent"]], 5L) + expect_equal(ss_after$ws[[new_ws_index, "ws_title"]], "Test Sheet") ## this worksheet gets deleted below