remove rev() on eav column names

ref #145
OuhscBbmc · Jan 20, 2020 · 234b838 · 234b838
1 parent 26b2940
commit 234b838
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/redcap-read-oneshot-eav.R b/R/redcap-read-oneshot-eav.R
@@ -258,8 +258,7 @@ redcap_read_oneshot_eav <- function(
               dplyr::select(field_name = .data$export_field_name) %>%
               dplyr::filter(grepl("^\\w+?_complete$", .data$field_name))
           ) %>%
-          dplyr::pull(.data$field_name) %>%
-          rev()
+          dplyr::pull(.data$field_name) #%>% rev()
 
         ds_eav_2 <-
           ds_eav %>%