From 234b8386404acd65f5dd72030c8082ad837e8ae3 Mon Sep 17 00:00:00 2001
From: Will Beasley <wibeasley@hotmail.com>
Date: Mon, 20 Jan 2020 14:18:24 -0600
Subject: [PATCH] remove `rev()` on eav column names

ref #145
---
 R/redcap-read-oneshot-eav.R | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/R/redcap-read-oneshot-eav.R b/R/redcap-read-oneshot-eav.R
index 97ec696d..3bd1826f 100644
--- 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 %>%