anchor.diff:      case string:tokens(Url, "://") of
           [_Proto, DomainPath | _] ->
               is_url_shortener_1(DomainPath);
  -        _ -> 
  +        _ ->
               false
       end.
   
  
positive.code:         {"Accept-Encoding", "identity"},
          {"Accept-Charset", "UTF-8;q=1.0, ISO-8859-1;q=0.5, *;q=0"},
          {"Accept-Language", "en,*;q=0"},
          {"User-Agent", httpc_ua(Url)},
          {"Connection", "close"}
      ] ++ case Max of
              undefined -> [];
              _ -> [ {"Range", "bytes=0-"++integer_to_list(Max-1)} ]
  
negative.code:         {http, {ReqId, stream_end, EndHs}} ->
              {ok, {200, EndHs++Hs, N, Data}};
          {http, _} ->
              httpc:cancel_request(ReqId),
              {ok, {200, Hs, N, Data}}
      after 100 ->
          httpc:cancel_request(ReqId),
  