From 8f60d6b7e8b9bd35ffeed6cbe35f434afea86f32 Mon Sep 17 00:00:00 2001
From: chainsawriot <chainsawtiney@gmail.com>
Date: Tue, 25 Jul 2023 18:51:16 +0200
Subject: [PATCH] Use `list_ods_sheets` instead

`readODS::ods_sheets` has been superseded by
`readODS::list_ods_sheets` since version 1.7.0 (2020-07-10) and will be removed in
the upcoming readODS v2.0.0 (probably will be on CRAN next month).

Sorry for introducing this breaking change.
---
 DESCRIPTION       | 2 +-
 R/convert_esaps.R | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 6d45501..fd53667 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -18,6 +18,6 @@ Imports:
     dplyr,
     tidyr,
     plyr (>= 1.8.4),
-    readODS (>= 1.6.4),
+    readODS (>= 1.7.0),
     readxl (>= 1.0.0)
 RoxygenNote: 7.1.1
diff --git a/R/convert_esaps.R b/R/convert_esaps.R
index e75583c..9065027 100644
--- a/R/convert_esaps.R
+++ b/R/convert_esaps.R
@@ -116,7 +116,7 @@ convert_esaps<-function(path = NULL,
                 if(isTRUE(allSheet)){
                         nSheets <- vector("numeric", length = length(file.name))
                         for(i in 1:length(file.name)){
-                                nSheets[i] <- length(readODS::ods_sheets(file.name[i]))
+                                nSheets[i] <- length(readODS::list_ods_sheets(file.name[i]))
                         }
                 }
                 dat <- list()