remove on.exit from plot.epiparameter, closes #409

epiverse-trace · Nov 26, 2024 · 479d365 · 479d365
1 parent a6c5c2b
commit 479d365
Showing 1 changed file with 0 additions and 3 deletions.
diff --git a/R/plot.R b/R/plot.R
@@ -52,9 +52,6 @@ plot.epiparameter <- function(x,
   # capture dots
   dots <- list(...)
 
-  oldpar <- graphics::par(no.readonly = TRUE)
-  on.exit(graphics::par(oldpar))
-
   if (is_continuous(x)) {
     main <- "Probability Density Function"
   } else {