diff --git a/index.Rmd b/index.Rmd index 7f2f53d..009f8e7 100644 --- a/index.Rmd +++ b/index.Rmd @@ -119,11 +119,11 @@ mois_label <- c("Janvier", ``` ```{r report} -observeEvent(input$report, +observeEvent(input$report, { rmarkdown::render("CRHAP.Rmd", output_file = "/var/www/html/cloture/crhap.html", params = list(CRH = CRH(), CRH_seance = CRH_seance(), CRH_sans_seance = CRH_sans_seance())) - showModal(modalDialog(title = "Publication", "Fichier disponible à l'adresse suivante : https://livenne.chu-nancy.fr/sitedim/index.php/clot/presence-crh", easyClose = T)) + showModal(modalDialog(title = "Publication", p("Fichier disponible", a("ici", href = "https://livenne.chu-nancy.fr/sitedim/index.php/clot/presence-crh")), easyClose = T, footer = NULL)) }) ```