correctly clean tool env

cderv · cderv · commit 91dd70690c44 · 2025-02-05T11:11:30.000-06:00
diff --git a/src/resources/rmd/execute.R b/src/resources/rmd/execute.R
@@ -153,7 +153,7 @@ execute <- function(input, format, tempDir, libDir, dependencies, cwd, params, r
   }
   .quarto_tools_env$.rmFromQuartoToolsEnv <- function(name) {
     if (exists(name, envir = .quarto_tools_env)) {
-      rm(name, envir = .quarto_tools_env)
+      rm(list = c(name), envir = .quarto_tools_env)
     }
   }
 

Original file line number	Diff line number	Diff line change
`@@ -153,7 +153,7 @@ execute <- function(input, format, tempDir, libDir, dependencies, cwd, params, r`
`153`	`153`	`}`
`154`	`154`	`.quarto_tools_env$.rmFromQuartoToolsEnv <- function(name) {`
`155`	`155`	`if (exists(name, envir = .quarto_tools_env)) {`
`156`		`- rm(name, envir = .quarto_tools_env)`
	`156`	`+ rm(list = c(name), envir = .quarto_tools_env)`
`157`	`157`	`}`
`158`	`158`	`}`
`159`	`159`