Merge branch 'master' of github.com:sharlagelfand/opendatatoronto

sharlagelfand · Aug 31, 2019 · e0a5899 · e0a5899
2 parents 884002d + 672ef2a
commit e0a5899
Show file tree

Hide file tree

Showing 4 changed files with 8 additions and 0 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -4,6 +4,7 @@ package_res_init <- tibble::tibble(
   title = character(),
   id = character(),
   topics = character(),
+  civic_issues = character(),
   excerpt = character(),
   dataset_category = character(),
   num_resources = integer(),

diff --git a/tests/testthat/test-list_packages.R b/tests/testthat/test-list_packages.R
@@ -8,6 +8,7 @@ test_that("list_packages returns the right output formats.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")

diff --git a/tests/testthat/test-search_packages.R b/tests/testthat/test-search_packages.R
@@ -8,6 +8,7 @@ test_that("search_packages has the correct return format.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")
@@ -21,6 +22,7 @@ test_that("search_packages has the correct return format.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")
@@ -34,6 +36,7 @@ test_that("search_packages has the correct return format.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")

diff --git a/tests/testthat/test-show_package.R b/tests/testthat/test-show_package.R
@@ -8,6 +8,7 @@ test_that("show_package has the correct return format.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")
@@ -21,6 +22,7 @@ test_that("show_package has the correct return format.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")
@@ -34,6 +36,7 @@ test_that("show_package has the correct return format.", {
   expect_is(output$title, "character")
   expect_is(output$id, "character")
   expect_is(output$topics, "character")
+  expect_is(output$civic_issues,"character")
   expect_is(output$excerpt, "character")
   expect_is(output$dataset_category, "character")
   expect_is(output$formats, "character")