From 85c806d6058ba8eb7dec93e22fd39fb29728ceab Mon Sep 17 00:00:00 2001
From: aho <an.ho@bsc.es>
Date: Wed, 20 Dec 2023 17:07:54 +0100
Subject: [PATCH] Fix .Rds files recognization

---
 R/Collect.R | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/R/Collect.R b/R/Collect.R
index 1bb8648..5ae8b15 100644
--- a/R/Collect.R
+++ b/R/Collect.R
@@ -147,8 +147,7 @@ Collect_ecflow <- function(startr_exec, wait = TRUE, remove = TRUE, on_remote =
   done <- FALSE
   attempt <- 1
   if (!on_remote) {
-    #TODO: Is it correct? Not all the cases have "output" as beginning
-    sum_received_chunks <- sum(grepl('output.*\\.Rds', 
+    sum_received_chunks <- sum(grepl('.*\\.Rds$', 
                                      list.files(ecflow_suite_dir_suite)))
   }
 
-- 
GitLab