Update R/browse_metadata.R

Co-authored-by: Rachael Stickland <[email protected]>
aim-rsf · Nov 27, 2024 · acef2af · acef2af
1 parent 8eb3669
commit acef2af
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/browse_metadata.R b/R/browse_metadata.R
@@ -153,7 +153,7 @@ browse_metadata <- function(json_file = NULL, output_dir = NULL) {
   # SAVE PLOTS ----
 
   original_wd <- getwd()
-  on.exit(output_dir) # saveWidget has a bug with paths & saving
+ on.exit(setwd(original_wd)) # saveWidget has a bug with paths & saving
   base_fname <- paste0(gsub(" ", "", dataset_name), "_V", dataset_version)
 
   ## Save the table plot to a HTML file