From ce33c2459f493a45957e0d6c661922719a731f83 Mon Sep 17 00:00:00 2001
From: Sam Rogers <7007561+rogerssam@users.noreply.github.com>
Date: Mon, 16 Oct 2023 11:34:57 +1030
Subject: [PATCH] Why is this test failing?

---
 tests/testthat/test-weathervane.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/tests/testthat/test-weathervane.R b/tests/testthat/test-weathervane.R
index 2352595..9685b80 100644
--- a/tests/testthat/test-weathervane.R
+++ b/tests/testthat/test-weathervane.R
@@ -114,6 +114,7 @@ test_that('get_weather_data() has different column names if pretty_names = FALSE
 
 test_that('get_weather_data() returns all weather variables by default', {
   data <- get_weather_data(-34.968, 138.635, start_date = "2023-10-10", finish_date = "2023-10-15")
+  head(data)
   expect_identical(colnames(data),
                    c("Date", "Latitude", "Longitude", "Elevation (m)",
                      weather_variables()$pretty_name))