Add support for Maps on request_body matcher

lib/exvcr/handler.ex

@@ -166,11 +166,15 @@ defmodule ExVCR.Handler do
       request_body = response[:request].body || response[:request].request_body
       key_body     = keys[:request_body] |> to_string |> ExVCR.Filter.filter_sensitive_data
 
-      if match = Regex.run(~r/~r\/(.+)\//, request_body) do
-        pattern = Regex.compile!(Enum.at(match, 1))
-        Regex.match?(pattern, key_body)
-      else
-        request_body == key_body
+      cond do
+        match = Regex.run(~r/~r\/(.+)\//, request_body) ->
+          pattern = Regex.compile!(Enum.at(match, 1))
+          Regex.match?(pattern, key_body)
+
+        Regex.run(~r/^%{.*}$/,  request_body) ->
+          {result, _} = Code.eval_string(request_body)
+          JSX.decode!(key_body) == JSX.decode!(JSX.encode!(result))
+        true -> request_body == key_body
       end
     else
       true

test/handler_stub_mode_test.exs

@@ -47,6 +47,14 @@ defmodule ExVCR.Adapter.HandlerStubModeTest do
     end
   end
 
+  test "request_body matches as map" do
+    use_cassette :stub, [url: 'http://localhost', method: :post, request_body: "%{param1: \"value1\", param2: \"value2\"}", body: "Hello World"] do
+      {:ok, status_code, _headers, body} = :ibrowse.send_req('http://localhost', [], :post, '{"param1":"value1", "param2":"value2"}')
+      assert status_code == '200'
+      assert to_string(body) =~ ~r/Hello World/
+    end
+  end
+
   test "request_body mismatches as regex" do
     assert_raise ExVCR.InvalidRequestError, fn ->
       use_cassette :stub, [url: 'http://localhost', method: :post, request_body: "~r/param3/", body: "Hello World"] do