Fix shiny error.

Author: elinrow

Reporting/study_shiny/data/preprocess.R

@@ -24,6 +24,8 @@ result <- purrr::map(csv_files, \(x){
   omopgenerics::bind() |>
   omopgenerics::newSummarisedResult()
 
+result$additional_level <- gsub("&&&\\s*&&&", "&&& NULL &&&", result$additional_level)
+
 resultList <- resultList |>
   purrr::map(\(x) {
     omopgenerics::settings(result) |>

Reporting/study_shiny/global.R

@@ -1,6 +1,6 @@
 # Generated by OmopViewer 0.2.0
 # Be careful editing this file
-#renv::activate()
+# renv::activate()
 renv::restore()
 
 library(bslib)