From dfad6ac58c0e679a23fc969d091ab436649c6d72 Mon Sep 17 00:00:00 2001
From: Delaigue Olivier <olivier.delaigue@irstea.priv>
Date: Wed, 6 Mar 2019 08:35:37 +0100
Subject: [PATCH] v1.2.7.9 CLEAN: warning msg removed in
TransfoParam_CemaNeige* if ParamIn is a vector
---
DESCRIPTION | 2 +-
NEWS.rmd | 2 +-
R/TransfoParam_CemaNeige.R | 1 -
R/TransfoParam_CemaNeigeHyst.R | 1 -
4 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/DESCRIPTION b/DESCRIPTION
index 9a8c48de..6fb0b7d4 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
Package: airGR
Type: Package
Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.2.7.8
+Version: 1.2.7.9
Date: 2019-03-06
Authors@R: c(
person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
diff --git a/NEWS.rmd b/NEWS.rmd
index f913f1db..48f4ef9f 100644
--- a/NEWS.rmd
+++ b/NEWS.rmd
@@ -13,7 +13,7 @@ output:
-### 1.2.7.8 Release Notes (2019-03-06)
+### 1.2.7.9 Release Notes (2019-03-06)
diff --git a/R/TransfoParam_CemaNeige.R b/R/TransfoParam_CemaNeige.R
index 4754595e..52edc628 100644
--- a/R/TransfoParam_CemaNeige.R
+++ b/R/TransfoParam_CemaNeige.R
@@ -8,7 +8,6 @@ TransfoParam_CemaNeige <- function(ParamIn, Direction) {
Bool <- is.vector(ParamIn)
if (Bool) {
ParamIn <- matrix(ParamIn, nrow = 1)
- warning("'ParamIn' automatically convert to 'matrix'")
}
if (!inherits(ParamIn, "matrix")) {
stop("'ParamIn' must be of class 'matrix'")
diff --git a/R/TransfoParam_CemaNeigeHyst.R b/R/TransfoParam_CemaNeigeHyst.R
index 09a88934..a82491a3 100644
--- a/R/TransfoParam_CemaNeigeHyst.R
+++ b/R/TransfoParam_CemaNeigeHyst.R
@@ -8,7 +8,6 @@ TransfoParam_CemaNeigeHyst <- function(ParamIn, Direction) {
Bool <- is.vector(ParamIn)
if (Bool) {
ParamIn <- matrix(ParamIn, nrow = 1)
- warning("'ParamIn' automatically convert to 'matrix'")
}
if (!inherits(ParamIn, "matrix")) {
stop("'ParamIn' must be of class 'matrix'")
--
GitLab