From 129576b971737dbe47aada552b0ddfbf16782543 Mon Sep 17 00:00:00 2001
From: Cole Arendt <cole.arendt@outlook.com>
Date: Sun, 31 May 2020 07:35:07 -0400
Subject: [PATCH] re-enable broken tests

---
 tests/testthat/test-gather_object.R  | 5 -----
 tests/testthat/test-json_structure.R | 2 --
 2 files changed, 7 deletions(-)

diff --git a/tests/testthat/test-gather_object.R b/tests/testthat/test-gather_object.R
index 0ac7f86..bda7796 100644
--- a/tests/testthat/test-gather_object.R
+++ b/tests/testthat/test-gather_object.R
@@ -2,7 +2,6 @@ context("gather_object")
 
 test_that("works in a simple case", {
 
-  skip("wait: testthat")
     json <- '{"name1": 1, "name2": 2}'
 
     expect_identical(
@@ -21,7 +20,6 @@ test_that("works in a simple case", {
 )
 
 test_that("works with compound values", {
-  skip("wait: testthat")
 
     json <- '{
 		  "name1": 1,
@@ -79,7 +77,6 @@ test_that("correctly handles character(0), {}, []", {
 
 test_that("column.name doesn't clobber existing name", {
 
-  skip("wait: testthat")
   expect_identical(
     '{"name1": 1, "name2": 2}' %>%
       as.tbl_json %>%
@@ -99,7 +96,6 @@ test_that("column.name doesn't clobber existing name", {
 )
 
 test_that("preserves a NULL column", {
-  skip("wait: testthat")
 
   expect_identical(
     '{"name1": 1, "name2": 2}' %>%
@@ -150,7 +146,6 @@ test_that("gather_keys has right column name", {
 })
 
 test_that("can call repeatedly without having to change column.name", {
-  skip("wait: testthat")
   expect_identical(
     suppressWarnings('{"n1": {"n2": 1}}' %>% gather_object %>% gather_object),
     tbl_json(
diff --git a/tests/testthat/test-json_structure.R b/tests/testthat/test-json_structure.R
index 6a8cc97..dfc279a 100644
--- a/tests/testthat/test-json_structure.R
+++ b/tests/testthat/test-json_structure.R
@@ -23,7 +23,6 @@ test_that("simple string works", {
 })
 
 test_that("simple object works", {
-  skip("wait: testthat")
   actual <- '{"name": "value"}' %>% json_structure
   expected <- tbl_json(
       dplyr::tibble(
@@ -73,7 +72,6 @@ test_that("simple array works", {
 
 test_that("nested object works", {
 
-  skip("wait: testthat")
   expect_identical(
     '{"k1": {"k2": "value"}}' %>% json_structure,
     tbl_json(