From f379df974b8ee3ffb36bb520d4c1d2235267cc6d Mon Sep 17 00:00:00 2001
From: Dongdong Kong <kongdd@users.noreply.github.com>
Date: Mon, 30 Dec 2024 16:37:25 +0800
Subject: [PATCH] deprecate openxlsx

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

diff --git a/R/tools_ufile.R b/R/tools_ufile.R
index b387004..996bff3 100644
--- a/R/tools_ufile.R
+++ b/R/tools_ufile.R
@@ -33,7 +33,7 @@ read_excel <- function(f, ...) {
   fun <- switch(file_ext(f),
     csv = data.table::fread,
     xls = readxl::read_xls,
-    xlsx = read_xlsx
+    xlsx = readxl::read_xlsx
   )
   d <- fun(f, ...)
   if ("DOY" %in% names(d)) d <- dplyr::select(d, -DOY)