From 1af89bd336868c3572c103cdf1b8717eae338c2a Mon Sep 17 00:00:00 2001
From: Richard Hanna <richardshanna91@gmail.com>
Date: Mon, 9 Sep 2024 10:15:28 -0400
Subject: [PATCH] Update REDCapR to 1.2.0, update guess_max to Inf

---
 DESCRIPTION        | 2 +-
 R/read_redcap.R    | 4 ++--
 man/read_redcap.Rd | 4 ++--
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 65931fb1..e491b4c1 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -25,7 +25,7 @@ Imports:
     lobstr,
     lubridate,
     purrr,
-    REDCapR (>= 1.1.0),
+    REDCapR (>= 1.2.0),
     rlang,
     stringi,
     stringr,
diff --git a/R/read_redcap.R b/R/read_redcap.R
index 83049b22..a350cd3c 100644
--- a/R/read_redcap.R
+++ b/R/read_redcap.R
@@ -53,7 +53,7 @@
 #' from REDCapR API calls. Default `TRUE`.
 #' @param guess_max A positive [base::numeric] value
 #' passed to [readr::read_csv()] that specifies the maximum number of records to
-#' use for guessing column types. Default `.Machine$integer.max`.
+#' use for guessing column types. Default `Inf`.
 #' @param allow_mixed_structure A logical to allow for support of mixed repeating/non-repeating
 #' instruments. Setting to `TRUE` will treat the mixed instrument's non-repeating versions
 #' as repeating instruments with a single instance. Applies to longitudinal projects
@@ -80,7 +80,7 @@ read_redcap <- function(redcap_uri,
                         export_survey_fields = NULL,
                         export_data_access_groups = NULL,
                         suppress_redcapr_messages = TRUE,
-                        guess_max = .Machine$integer.max,
+                        guess_max = Inf,
                         allow_mixed_structure = getOption("redcaptidier.allow.mixed.structure", FALSE)) {
   check_arg_is_character(redcap_uri, len = 1, any.missing = FALSE)
   check_arg_is_character(token, len = 1, any.missing = FALSE)
diff --git a/man/read_redcap.Rd b/man/read_redcap.Rd
index 7b7c9e15..2233b153 100644
--- a/man/read_redcap.Rd
+++ b/man/read_redcap.Rd
@@ -12,7 +12,7 @@ read_redcap(
   export_survey_fields = NULL,
   export_data_access_groups = NULL,
   suppress_redcapr_messages = TRUE,
-  guess_max = .Machine$integer.max,
+  guess_max = Inf,
   allow_mixed_structure = getOption("redcaptidier.allow.mixed.structure", FALSE)
 )
 }
@@ -46,7 +46,7 @@ from REDCapR API calls. Default \code{TRUE}.}
 
 \item{guess_max}{A positive \link[base:numeric]{base::numeric} value
 passed to \code{\link[readr:read_delim]{readr::read_csv()}} that specifies the maximum number of records to
-use for guessing column types. Default \code{.Machine$integer.max}.}
+use for guessing column types. Default \code{Inf}.}
 
 \item{allow_mixed_structure}{A logical to allow for support of mixed repeating/non-repeating
 instruments. Setting to \code{TRUE} will treat the mixed instrument's non-repeating versions