anchor.diff:  %%%========================================================================
   %%% Internal functions
   %%%========================================================================
  +normalize_and_parse_url(Url) ->
  +    case uri_string:normalize(Url) of
  +        {error, _, _} = Error -> Error;
  +        UriString -> uri_string:parse(UriString)
  +    end.
  +
   handle_request(Method, Url, 
                  URI,
   	       Headers0, ContentType, Body0,
  
positive.code:        (Method =:= delete) orelse 
         (Method =:= trace) andalso 
         (is_atom(Profile) orelse is_pid(Profile)) ->
      case uri_string:parse(uri_string:normalize(Url)) of
  	{error, Reason, _} ->
  	    {error, Reason};
  	ParsedUrl ->
  
negative.code:     end.
  
  do_request(Method, {Url, Headers, ContentType, Body}, HTTPOptions, Options, Profile) ->
      case normalize_and_parse_url(Url) of
  	{error, Reason, _} ->
  	    {error, Reason};
  	ParsedUrl ->
  