diff --git a/R/api.R b/R/api.R
index c3d799105adf334f6b55d4495e0887e0d748dda8..45bbd8e706b60c88086db57aaa08f8edcaa57df7 100644
--- a/R/api.R
+++ b/R/api.R
@@ -553,8 +553,7 @@ extr_data_serial <- function(m) {
 
     fn_ex <- get_fn_extr(m)
     timetag <- format(Sys.time(), "%Y%m%d_%H%M%S")
-    saveRDS(object = m, file = file.path(m$run$paths$project,
-                                         paste0(timetag,"_",FN_EXTR_STATE)))
+    saveRDS(object = m, file = file.path(m$run$paths$project,FN_EXTR_STATE))
     m
     
 }