Address lintr warnings

ropensci · Dec 20, 2024 · 25a0092 · 25a0092
1 parent e28c762
commit 25a0092
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/R/measures.R b/R/measures.R
@@ -4,7 +4,7 @@
 #' @param station station ID, see riem_stations()
 #' @param date_start date of start of the desired data, e.g. "2016-01-01"
 #' @inheritParams rlang::args_dots_empty
-#' @param date_end date of end of the desired data, e.g. "2016-04-22". Default value is today.
+#' @param date_end date of end of the desired data, e.g. "2016-04-22". Default value is today. # nolint: line_length_linter
 #' @param data A vector of strings, representing the data columns to return.
 #' The available options are: all, tmpf, dwpf, relh, drct, sknt, p01i, alti, mslp, vsby, gust, skyc1, skyc2, skyc3, skyc4, skyl1, skyl2, skyl3, skyl4, wxcodes, ice_accretion_1hr, ice_accretion_3hr, ice_accretion_6hr, peak_wind_gust, peak_wind_drct, peak_wind_time, feel, metar, snowdepth # nolint: line_length_linter
 #' Default value is `all`.

diff --git a/tests/testthat/test-measures.R b/tests/testthat/test-measures.R
@@ -161,7 +161,7 @@ test_that("riem_measures parses all params", {
   })
   expect_s3_class(output, "tbl_df")
 
-  expect_setequal(names(output), c("station", "valid", "elevation", "tmpf", "dwpf"))
+  expect_setequal(names(output), c("station", "valid", "elevation", "tmpf", "dwpf")) # nolint: line_length_linter
 
   expect_type(output[["station"]], "character")
   expect_s3_class(output[["valid"]], "POSIXct")
@@ -171,7 +171,7 @@ test_that("riem_measures parses all params", {
 })
 
 test_that("riem_measures provides proper report types (6 combinations)", {
-  # report_type = hfmetar
+  # report_type = hfmetar   # nolint: commented_code_linter
   httptest2::with_mock_dir(file.path("fixtures", "measures3"), {
     output <- riem_measures(
       station = "KCVG", # choose a second station (VOHY used elsewhere)
@@ -189,7 +189,7 @@ test_that("riem_measures provides proper report types (6 combinations)", {
   expect_s3_class(output[["valid"]], "POSIXct")
   expect_type(output[["metar"]], "character")
 
-  # report_type = routine
+  # report_type = routine   # nolint: commented_code_linter
   httptest2::with_mock_dir(file.path("fixtures", "measures3"), {
     output <- riem_measures(
       station = "KCVG", # choose a second station (VOHY used elsewhere)
@@ -207,7 +207,7 @@ test_that("riem_measures provides proper report types (6 combinations)", {
   expect_s3_class(output[["valid"]], "POSIXct")
   expect_type(output[["metar"]], "character")
 
-  # report_type = specials
+  # report_type = specials   # nolint: commented_code_linter
   httptest2::with_mock_dir(file.path("fixtures", "measures3"), {
     output <- riem_measures(
       station = "KCVG", # choose a second station (VOHY used elsewhere)