envir= added to learnr_server()

Author: phgrosjean

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: BioDataScience3
-Version: 2025.0.0
+Version: 2025.0.1
 Title: A Series of Learnr Documents for Biological Data Science 3
 Description: Interactive documents using learnr for studying biological data science (second course).
 Authors@R: c(

NEWS.md

@@ -1,3 +1,7 @@
+# BioDataScience3 2025.0.1
+
+-   Argument `envir=` added to `learnr_server()` to accomodate changes for compatibility with a Posit Connect server.
+
 # BioDataScience3 2025.0.0
 
 -   New version for academic year 2024-2025.

R/learnr.R

@@ -44,5 +44,7 @@ learnr_banner <- function(simple = FALSE) {
 #' @param input The Shiny input.
 #' @param output The Shiny output.
 #' @param session The Shiny session.
-learnr_server <- function(input, output, session)
-  learnitdownLearnrServer(input, output, session)
+#' @param envir The environment in which to evaluate code (by default, the
+#'   parent frame).
+learnr_server <- function(input, output, session, envir = parent.frame())
+  learnitdownLearnrServer(input, output, session, envir)