Fix nest test

imanns · May 16, 2016 · 2876b5d · 2876b5d
1 parent e4906fb
commit 2876b5d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-nest.R b/tests/testthat/test-nest.R
@@ -40,5 +40,5 @@ test_that("puts data into the correct row", {
 test_that("nesting everything yields a simple data frame", {
   df <- dplyr::data_frame(x = 1:3, y = c("B", "A", "A"))
   out <- nest(df, x, y)
-  expect_equal(out, dplyr::data_frame(data = list(df)))
+  expect_equal(out$data, list(df))
 })