v0.2.3.4 draw a box on exit in plot.Calgr and plot.PrepGR

DESCRIPTION

 Package: airGRteaching
 Type: Package
 Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
-Version: 0.2.3.3
-Date: 2018-08-09
+Version: 0.2.3.4
+Date: 2018-08-12
 Authors@R: c(
   person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@irstea.fr"),
   person("Laurent", "Coron", role = c("aut"), comment = c(ORCID = "0000-0002-1503-6204")),

NEWS

 ############# Release History of the airGRteaching Package
 
 
-## 0.2.3.3 Release Notes (2018-08-09)
+## 0.2.3.4 Release Notes (2018-08-12)
 
 
 ## 0.2.3.2 Release Notes (2018-08-08)

R/plot.CalGR.R

@@ -106,5 +106,6 @@ plot.CalGR <- function(x, xlab = NULL, ylab =  NULL, main = NULL, which = c("per
     #   legend("topright", legend = "NA", pch = 15, col = col.na, bty = "n", cex = 0.8)
     # }
   }
+  box()
   
 }
\ No newline at end of file

R/plot.PrepGR.R

@@ -41,4 +41,6 @@ plot.PrepGR <- function(x, type = "l", col.Precip = "royalblue", col.Q = "black"
     legend("topright", legend = "NA", pch = 15, col = col.na, bty = "n", cex = 0.8)
   }
   
+  box()
+  
 }
\ No newline at end of file