Update tests

USGS-R · Mar 14, 2019 · 55f34cc · 55f34cc
1 parent 5408d20
commit 55f34cc
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 5 deletions.
diff --git a/inst/extdata/correctionsataglance/correctionsataglance-example7.json b/inst/extdata/correctionsataglance/correctionsataglance-example7.json
@@ -340,7 +340,7 @@
     "county": "Clark County",
     "description": "Shows overview of correction information",
     "title": "Corrections At a Glance",
-    "excludeCorrections": "",
+    "excludedCorrections": "",
     "primaryParameter": "Discharge.ft^3/s@094196781",
     "primaryTsIdentifier": "b74def186df84afe9b6ca78d3db7f464",
     "requestId": "CorrectionsAtAGlanceChoreographer-673c946f-2986-46f7-aaa7-72f92cf0574f",

diff --git a/inst/extdata/testsnippets/test-utils-plot.json b/inst/extdata/testsnippets/test-utils-plot.json
@@ -13492,7 +13492,7 @@
             "ratingModelIdentifier": "Gage height-Discharge.STGQ@01010000",
             "firstStatDerivedIdentifier": "d859d139b2c54cffa2fb6ee358340654",
             "thirdStatDerivedIdentifier": "",
-			"excludeCorrections": "",
+			"excludedCorrections": "",
 			"excludeZeroNegative": false,
 			"excludeDiscrete": false,
 			"gradeMetadata": {

diff --git a/tests/testthat/test-timeseriessummary.R b/tests/testthat/test-timeseriessummary.R
@@ -2921,7 +2921,9 @@ test_that('formatAdvReportOptions function returns expected info to display on T
                                "county": "Aroostook County",
                                "description": "Shows relevant information about a timeseries",
                                "title": "Time Series Summary",
-                               "excludeCorrections": "DeleteRegion,",
+                               "requestParameters": {
+                                  "excludedCorrections": [ "DeleteRegion", "AdjustableTrim", "Deviation" ]
+                               },
                                "primaryParameter": "Discharge.ft^3/s@01011000",
                                "primaryTsIdentifier": "abd7a6b631874668b953e88cbbf4e374",
                                "requestId": "TimeSeriesSummaryChoreographer-cea278ed-392f-4db1-9c58-ba11ea5eeb96",
@@ -2940,8 +2942,8 @@ test_that('formatAdvReportOptions function returns expected info to display on T
                                "startDate": "2016-08-01T00:00:00Z"
 }
 }')
-  advOptions <- repgen:::formatAdvReportOptions(repgen:::fetchReportMetadataField(advOptionsJson,'excludeCorrections'))
-  expect_equal(advOptions, "Delete region corrections excluded.")
+  advOptions <- repgen:::formatAdvReportOptions(repgen:::fetchRequestParametersField(advOptionsJson,'excludedCorrections'))
+  expect_equal(advOptions, "Delete corrections excluded.")
 })
 
 setwd(dir = wd)