From 17454795134ab6e5ef652e5b3cbccc41668e319c Mon Sep 17 00:00:00 2001
From: aviaviavi <avipress@gmail.com>
Date: Tue, 10 Jul 2018 15:53:44 -0700
Subject: [PATCH] bug fix for indexing. we were folding in the wrong direction

---
 src/Testing/CurlRunnings.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Testing/CurlRunnings.hs b/src/Testing/CurlRunnings.hs
index 7ce20f2..17816d9 100644
--- a/src/Testing/CurlRunnings.hs
+++ b/src/Testing/CurlRunnings.hs
@@ -345,8 +345,8 @@ getValueForQuery (CurlRunningsState _ previousResults _) full@(NonInterpolatedQu
                 NullPointer
                   (T.pack $ show full)
                   "No data was returned from this case"
-      in foldr
-           (\index eitherVal ->
+      in foldl
+           (\eitherVal index ->
               case (eitherVal, index) of
                 (Left l, _) -> Left l
                 (Right (Object o), KeyIndex k) ->