bug fixes in env interpolation

aviaviavi · Apr 16, 2018 · d77324d · d77324d
1 parent d22d651
commit d77324d
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/curl-runnings.cabal b/curl-runnings.cabal
@@ -2,10 +2,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 7a965c82a62329701b5df6f6c7db403b6958043edbe4ce08a6a84475e833e697
+-- hash: 249e734681fdb8d0a482590af67f1d55c84e5704eb1725392aeef2e446c107ba
 
 name:           curl-runnings
-version:        0.5.3
+version:        0.5.4
 synopsis:       A framework for declaratively writing curl based API tests
 description:    Please see the README on Github at <https://github.com/aviaviavi/curl-runnings#readme>
 category:       Testing

diff --git a/package.yaml b/package.yaml
@@ -1,5 +1,5 @@
 name:                curl-runnings
-version:             0.5.3
+version:             0.5.4
 github:              aviaviavi/curl-runnings
 license:             MIT
 author:              Avi Press

diff --git a/src/Testing/CurlRunnings.hs b/src/Testing/CurlRunnings.hs
@@ -260,7 +260,7 @@ runReplacements _ s@(String "") = Right s
 runReplacements state (String s) =
   case parseQuery s of
     Right [LiteralText t] -> Right $ String t
-    Right [q@(InterpolatedQuery _ _)] -> getValueForQuery state q
+    Right [q@(InterpolatedQuery _ _)] -> getStringValueForQuery state q >>= (Right . String)
     Right [q@(NonInterpolatedQuery _)] -> getValueForQuery state q
     Right _ -> mapRight String $ interpolateQueryString state s
     Left parseErr -> Left parseErr