anchor.diff:    ExpectedResponse = make_response(Rsp, SubVars),
     ActualResponse   = request(Request),
     case Result = validate(ExpectedResponse, ActualResponse) of
  -    pass -> run_scenario(T, Params, SubVars, [{Request, Result}|Acc]);
  -    _    -> dbg(Description, Request, ExpectedResponse, ActualResponse, Result)
  +    pass -> run_scenario(Scenario, T, Params, SubVars, [{Request, Result}|Acc]);
  +    _    -> dbg(Scenario, Description, Request, ExpectedResponse, ActualResponse, Result)
     end;
  -run_scenario([], _, _, Acc) ->
  +run_scenario(_, [], _, _, Acc) ->
     Acc.
   
   make_request_url(_, Url="http://"++_)  -> Url;
  
positive.code: %% @private
  run(From, Scenario, Params, SubVars) ->
    {ok, Blueprint} = katt_blueprint_parse:file(Scenario),
    From ! {done, run_scenario(Blueprint, Params, SubVars)}.
  
  %%%_* Internal =========================================================
  run_scenario(Blueprint, Params, SubVars) ->
    run_scenario(Blueprint#api_blueprint.operations, Params, SubVars, []).
  
  run_scenario( [#katt_operation{ description=Description
                                , request=Req
                                , response=Rsp
                                }|T]
  
negative.code:                 ).
  
  
  dbg(Scenario, Description, Request, ExpectedResponse, ActualResponse, Result) ->
    ct:pal("Scenario:~n~p~n~n"
           "Description:~n~p~n~n"
           "Request:~n~p~n~n"
           "Expected response:~n~p~n~n"
           "Actual response:~n~p~n~n"
           "Result:~n~p~n~n",
           [ Scenario
           , Description
           , Request
           , ExpectedResponse
           , ActualResponse
           , Result
           ]).
  
  substitute(Bin, [])         -> Bin;
  substitute(Bin, [{K, V}|T]) -> substitute(substitute(Bin, K, V), T).
  