[FIX] - remove pattern from downloaded qfeatures object

UCLouvain-CBIO · Jul 15, 2024 · 582ae2c · 582ae2c
1 parent ada6132
commit 582ae2c
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/server_module_summary_tab.R b/R/server_module_summary_tab.R
@@ -67,7 +67,9 @@ server_module_summary_tab <- function(id) {
                 "qfeatures_object.rds"
             },
             content = function(file) {
-                saveRDS(global_rv$qfeatures, file)
+                final_qfeatures <- global_rv$qfeatures
+                names(final_qfeatures) <- remove_QFeaturesGUI(names(final_qfeatures))
+                saveRDS(final_qfeatures, file)
             }
         )
     })