From 70da7b40ee052379c0e61022da43413a494c8d02 Mon Sep 17 00:00:00 2001
From: PaulJonasJost <jost.pauljonas@gmail.com>
Date: Tue, 30 Jan 2024 17:25:11 +0100
Subject: [PATCH] Reverted wrong change.

---
 program/shinyApp/R/pca/server.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/program/shinyApp/R/pca/server.R b/program/shinyApp/R/pca/server.R
index 5c7b48d2..3eea59a4 100644
--- a/program/shinyApp/R/pca/server.R
+++ b/program/shinyApp/R/pca/server.R
@@ -169,7 +169,7 @@ pca_Server <- function(id, data, params, row_select){
           "PCA - ", params$omic_type, "-",
           paste0("entities:",row_select(),collapse = "_"),
           "-samples",
-          ifelse(any(input$sample_selection != "all"),paste0(" (with: ",paste0(input$sample_selection,collapse = ", "),")"))
+          ifelse(any(input$sample_selection != "all"),paste0(" (with: ",paste0(input$sample_selection,collapse = ", "),")"),"")
           , "-preprocessing: ",
           input$PreProcessing_Procedure
         )