From d0fa2b6f1d47ff1e9fc2c4113c413042989c9b94 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?L=C3=A9a?= <lcimetiere@charolaise.fr>
Date: Wed, 24 Jun 2026 15:29:35 +0200
Subject: [PATCH] =?UTF-8?q?[=C3=A9Cow]=20correction=20listes=20vides?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/common/prepare_data.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/common/prepare_data.R b/R/common/prepare_data.R
index 8201ea9..a489601 100755
--- a/R/common/prepare_data.R
+++ b/R/common/prepare_data.R
@@ -8,7 +8,7 @@ suppressPackageStartupMessages({
 #' @param tab_anims dataframe. Liste d'animaux brute
 #' @return Liste d'animaux nettoyée
 clean_data_anims<- function(tab_anims){
-  if (nrow(tab_anims) == 0) return()
+  if (is.null(tab_anims) || !isTRUE(nrow(tab_anims) > 0)) return()
   result_data <- tab_anims %>%
     mutate(
       dateNaiss = as.Date(as.POSIXct(dateNaiss / 1000, origin = "1970-01-01", tz = "UTC")),