fix read_importsealevels test

fawda123 · fawda123 · commit 99779e010cb4 · 2025-04-07T09:01:09.000-04:00
diff --git a/tests/testthat/test-read_importsealevels.R b/tests/testthat/test-read_importsealevels.R
@@ -19,7 +19,7 @@ mock_req_perform <- function(...) {
 
 # Mock read.csv to return a predefined dataframe
 mock_read_csv <- function(file, ...) {
-  data.frame(year = c(2023, 2023), month = c(1, 2), msl = c(1.5, 1.6))
+  data.frame(date = c('2023-01-01', '2023-02-01'), year = c(2023, 2023), month = c(1, 2), msl = c(1.5, 1.6))
 }
 
 test_that("read_importsealevels writes and reads CSV correctly", {

Original file line number	Diff line number	Diff line change
`@@ -19,7 +19,7 @@ mock_req_perform <- function(...) {`
`19`	`19`
`20`	`20`	`# Mock read.csv to return a predefined dataframe`
`21`	`21`	`mock_read_csv <- function(file, ...) {`
`22`		`- data.frame(year = c(2023, 2023), month = c(1, 2), msl = c(1.5, 1.6))`
	`22`	`+ data.frame(date = c('2023-01-01', '2023-02-01'), year = c(2023, 2023), month = c(1, 2), msl = c(1.5, 1.6))`
`23`	`23`	`}`
`24`	`24`
`25`	`25`	`test_that("read_importsealevels writes and reads CSV correctly", {`