diff --git a/R/read_redcap_tables.R b/R/read_redcap_tables.R index b28909a..9f80194 100644 --- a/R/read_redcap_tables.R +++ b/R/read_redcap_tables.R @@ -92,15 +92,13 @@ read_redcap_tables <- function(uri, # Splitting - l <- REDCap_split(d, + out <- REDCap_split(d, m, forms = split_forms, primary_table_name = "" ) - # Sanitizing split list by removing completely empty rows apart from colnames - # in "generics" - sanitize_split(l, c(names(d)[1], generics)) + sanitize_split(out) } diff --git a/man/read_redcap_tables.Rd b/man/read_redcap_tables.Rd index f735f3a..e97c4c1 100644 --- a/man/read_redcap_tables.Rd +++ b/man/read_redcap_tables.Rd @@ -12,8 +12,7 @@ read_redcap_tables( events = NULL, forms = NULL, raw_or_label = "label", - split_forms = "all", - generics = c("redcap_event_name", "redcap_repeat_instrument", "redcap_repeat_instance") + split_forms = "all" ) } \arguments{