From 3ea2ebeda922db139c7f175da8bb574596ea6b04 Mon Sep 17 00:00:00 2001
From: Delaigue Olivier <olivier.delaigue@irstea.priv>
Date: Thu, 6 Jun 2019 18:38:19 +0200
Subject: [PATCH] v1.2.16.19 CLEAN: comment lines concerning the management of
 layout if the is RStudio are removed in plot.OutputsModel fun

---
 DESCRIPTION           |  2 +-
 NEWS.rmd              |  2 +-
 R/plot.OutputsModel.R | 15 ---------------
 3 files changed, 2 insertions(+), 17 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index ed6ba35a..70b5170a 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.16.18
+Version: 1.2.16.19
 Date: 2019-06-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 5410c615..06ab20ca 100644
--- a/NEWS.rmd
+++ b/NEWS.rmd
@@ -14,7 +14,7 @@ output:
 
 
 
-### 1.2.16.18 Release Notes (2019-06-06)
+### 1.2.16.19 Release Notes (2019-06-06)
 
 
 #### New features
diff --git a/R/plot.OutputsModel.R b/R/plot.OutputsModel.R
index c9f8459d..cf91f056 100644
--- a/R/plot.OutputsModel.R
+++ b/R/plot.OutputsModel.R
@@ -286,21 +286,6 @@ plot.OutputsModel <- function(x, Qobs = NULL, IndPeriod_Plot = NULL, BasinArea =
       }
 
       iPlotMax <- iPlot
-      
-      # isRStudio <- Sys.getenv("RSTUDIO") == "1";
-      # if (!isRStudio) {
-      #   if (Sum1 == 1 & Sum2 == 0) {width = 10; height = 05;}
-      #   if (Sum1 == 1 & Sum2 != 0) {width = 10; height = 07;}
-      #   if (Sum1 == 2 & Sum2 == 0) {width = 10; height = 05;}
-      #   if (Sum1 == 2 & Sum2 != 0) {width = 10; height = 07;}
-      #   if (Sum1 == 3 & Sum2 == 0) {width = 10; height = 07;}
-      #   if (Sum1 == 3 & Sum2 != 0) {width = 10; height = 10;}
-      #   if (Sum1 == 0 & Sum2 == 1) {width = 05; height = 05;}
-      #   if (Sum1 == 0 & Sum2 == 2) {width = 10; height = 04;}
-      #   if (Sum1 == 0 & Sum2 == 3) {width = 10; height = 03;}
-      #   dev.new(width = width, height = height)
-      #}
-      
       LayoutWidths  <- rep.int(1, ncol(matlayout))
       LayoutHeights <- iHght #rep.int(1, nrow(matlayout))
     }
-- 
GitLab