arrow_with_dataset

tdhock · Jul 16, 2024 · 6fd9e74 · 6fd9e74
1 parent 8e2fd29
commit 6fd9e74
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -3,7 +3,7 @@ Authors@R: c(
     person("Toby", "Hocking",
      email="[email protected]",
      role=c("aut", "cre")))
-Version: 2024.2.21
+Version: 2024.7.16
 License: GPL-3
 Title: Named Capture to Data Tables
 Description: User-friendly functions for extracting a data

diff --git a/NEWS b/NEWS
@@ -1,3 +1,7 @@
+Changes in version 2024.7.16
+
+- arrow::arrow_with_dataset() to avoid CRAN NOTE.
+
 Changes in version 2024.2.21
 
 - various minor updates, thanks CRAN.

diff --git a/R/capture_first_glob.R b/R/capture_first_glob.R
@@ -49,7 +49,7 @@ capture_first_glob <- structure(function
   (data.chunk.dt <- nc::capture_first_glob(glob, data.chunk.pattern, READ=read.bedGraph))
 
   ## Write same data set in Hive partition, then re-read.
-  if(requireNamespace("arrow")){
+  if(requireNamespace("arrow") && arrow::arrow_with_dataset()){
     path <- tempfile()
     max_rows_per_file <- if(interactive())3 else 1000
     arrow::write_dataset(