diff --git a/R/code_generator_processQFeatures.R b/R/code_generator_processQFeatures.R
index 21d5e40..d011de6 100644
--- a/R/code_generator_processQFeatures.R
+++ b/R/code_generator_processQFeatures.R
@@ -10,7 +10,7 @@
 codeGeneratorInitialization <- function(qf, step_number) {
     vec <- names(qf)
     if (step_number == 1) {
-        initial_setNames <- vec[grep(pattern = paste0("QFeaturesGUI#0"), vec)]
+        initial_setNames <- vec[grep(pattern = "QFeaturesGUI#0", vec)]
         initial_setNames <- remove_QFeaturesGUI(initial_setNames)
         step_setNames <- vec[grep(pattern = paste0("QFeaturesGUI#", step_number), vec)]
         step_setNames <- remove_QFeaturesGUI(step_setNames)
diff --git a/R/interface_module_aggregation_tab.R b/R/interface_module_aggregation_tab.R
index f66399c..167bdf5 100644
--- a/R/interface_module_aggregation_tab.R
+++ b/R/interface_module_aggregation_tab.R
@@ -93,8 +93,7 @@ interface_module_aggregation_tab <- function(id) {
                     ),
                     tooltipText = paste(
                         "Write the processed sets to the QFeatures object.",
-                        "This is needed to proceed to the next steps.",
-                        sep = " "
+                        "This is needed to proceed to the next steps."
                     ),
                     placement = "top"
                 )
diff --git a/R/interface_module_zero_to_na_tab.R b/R/interface_module_zero_to_na_tab.R
index 6565d54..458552c 100644
--- a/R/interface_module_zero_to_na_tab.R
+++ b/R/interface_module_zero_to_na_tab.R
@@ -32,8 +32,7 @@ interface_module_zero_to_na_tab <- function(id) {
             ),
             tooltipText = paste(
                 "Write the processed sets to the QFeatures object.",
-                "This is needed to proceed to the next steps.",
-                sep = " "
+                "This is needed to proceed to the next steps."
             ),
             placement = "top"
         )