pass user-specified timezone to waterDayYear()

ncss-tech · Sep 18, 2024 · 30bc37f · 30bc37f
1 parent d96cf6f
commit 30bc37f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/fetchSCAN.R b/R/fetchSCAN.R
@@ -306,7 +306,7 @@ fetchSCAN <- function(site.code = NULL, year = NULL, report = 'SCAN', timeseries
   d.long <- d.long[idx, ]
 
   # water year/day: October 1st -- September 30th
-  w <- waterDayYear(d.long$Date)
+  w <- waterDayYear(d.long$Date, tz = tz)
 
   # row-order is preserved
   d.long$water_year <- w$wy