Commit 2c49cda5 authored by Delaigue Olivier's avatar Delaigue Olivier Committed by Dorchies David
Browse files

v1.4.4.21 CLEAN: deprecated NewTimeFormat argument now checked #41

Showing with 4 additions and 2 deletions
+4 -2
Package: airGR Package: airGR
Type: Package Type: Package
Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
Version: 1.4.4.20 Version: 1.4.4.21
Date: 2020-04-20 Date: 2020-04-20
Authors@R: c( Authors@R: c(
person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")), person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
......
...@@ -4,7 +4,7 @@ ...@@ -4,7 +4,7 @@
### 1.4.4.20 Release Notes (2020-04-20) ### 1.4.4.21 Release Notes (2020-04-20)
#### New features #### New features
......
...@@ -7,6 +7,8 @@ SeriesAggreg2 <- function(TabSeries, Format, TimeFormat, NewTimeFormat, ConvertF ...@@ -7,6 +7,8 @@ SeriesAggreg2 <- function(TabSeries, Format, TimeFormat, NewTimeFormat, ConvertF
} }
if (!missing(NewTimeFormat)) { if (!missing(NewTimeFormat)) {
if (missing(Format)) { if (missing(Format)) {
TimeStep <- c("hourly", "daily", "monthly", "yearly")
NewTimeFormat <- match.arg(NewTimeFormat, choices = TimeStep)
Format <- switch(NewTimeFormat, Format <- switch(NewTimeFormat,
hourly = "%Y%m%d%h", hourly = "%Y%m%d%h",
daily = "%Y%m%d", daily = "%Y%m%d",
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment