diff --git a/dev/deploiment_sur_dataviz.R b/dev/deploiment_sur_dataviz.R
index 7abc3ee62655cf61dd6e4d60ed49156cfc7267ae..e31ec87c9e689e2cca3851adc02e5e6ae889dee7 100644
--- a/dev/deploiment_sur_dataviz.R
+++ b/dev/deploiment_sur_dataviz.R
@@ -12,6 +12,6 @@ to_svr_dataviz_ftp <- function(fic = "app/shiny_siclop.RData") {
 
 # fichiers à transférer
 app_files <- c(list.files("R/", full.names = TRUE, recursive = TRUE),
-               "dataviz_gitlabr.Rproj","github.RData","gitlab_forge.RData","gitlab.RData","date_MAJ.RData")
+               "dataviz_gitlabr.Rproj","github.RData","gitlab_forge.RData","gitlab.RData","date_MAJ.RData","path_annuaire.RData")
 # Exécution des transferts
 lapply(X = app_files, FUN = to_svr_dataviz_ftp)
diff --git a/dev/script_routine.R b/dev/script_routine.R
index 637455f1636e4c564de9c144a669116f5e34ee10..dbccb501e2038b4faf61c72046ff9de7e0f54b0d 100644
--- a/dev/script_routine.R
+++ b/dev/script_routine.R
@@ -11,8 +11,6 @@ source(file = "dev/github_extraire.R")
 source(file = "dev/gitlab_classique.R")
 source(file = "dev/gitlab_forge.R")
 
-source(file = "dev/deploiment_sur_dataviz.R", verbose = TRUE)
-
 path_annuaire <- paste0("annuaire/export_pauline_", str_sub(today(), 1, 7), ".csv")
 if (!file.exists(path_annuaire)) {
   unlink("annuaire", recursive = TRUE)
@@ -20,3 +18,7 @@ if (!file.exists(path_annuaire)) {
   download.file(url = "http://annuaire.e2.rie.gouv.fr/index.php?vue=exportcsv&dn=ou=CSD,ou=SCTE,ou=DREAL%20Pays%20Loire,ou=DR,ou=melanie",
                 destfile =  path_annuaire, method = "libcurl")
 }
+save(path_annuaire,file = "path_annuaire.RData")
+
+
+source(file = "dev/deploiment_sur_dataviz.R", verbose = TRUE)