anchor.diff:      end.
   
   
  -% Make the response more readable
  +%% normalise_response/1
  +%% ====================================================================
  +%% @doc
  +%% Standarizes HTTP response, e.g. transforms header names to lower case.
  +%% @end
  +-spec normalise_response({ok, string(), list(), list()}) -> {ok, integer(), list(), list()}.
  +%% ====================================================================
   normalise_response({ok, RcodeList, Headers, Body}) ->
       RcodeInt = list_to_integer(RcodeList),
       LowHeaders = [{string:to_lower(K), V} || {K, V} <- Headers],
  
positive.code:     end.
  
  
  % Parse out redirect URL from response
  get_redirect_url(OldURL, Headers) ->
      Location = proplists:get_value("location", Headers),
      case Location of
  
negative.code:         end, TeamList).
  
  
  %% find_XML_node/2
  %% ====================================================================
  %% @doc
  %% Finds certain XML node. Assumes that node exists, and checks only
  %% the first child of every node going deeper and deeper.
  %% @end
  -spec find_XML_node(atom(), #xmlElement{}) -> [string()].
  %% ====================================================================
  find_XML_node(NodeName, #xmlElement{name = NodeName} = XMLElement) ->
      XMLElement;
  
  