diff --git a/R/server.R b/R/server.R
index 3afa5dd..9c98018 100644
--- a/R/server.R
+++ b/R/server.R
@@ -210,7 +210,9 @@ server <- function(options) {
                     gene_names <- results_filtered()[, name]
                     gene_names <- unique(gene_names[gene_names != ""])
 
-                    diseases <- disgenet2r::disease_enrichment(gene_names)
+                    diseases <- suppressMessages(
+                        disgenet2r::disease_enrichment(gene_names)
+                    )
 
                     data <- data.table(diseases@qresult)