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) ->