anchor.diff:      handler.UseProxy <- true
       handler :> _
   
  -
   let createHttpHandler = 
       memoizeBy 
           // Truncates the url to only to host part, so there is only one handler per source/host.
  
positive.code:         (fun (url : string, auth) -> url.Substring(0, url.IndexOf('/', 8) + 1), auth) 
          createHttpHandlerRaw 
  
  let createHttpClient (url,auth:Auth option) : HttpClient =
      let handler = createHttpHandler (url, auth)
      let client = new HttpClient(handler)
      match auth with
  
negative.code:     | Some(Token token) ->
          client.DefaultRequestHeaders.Authorization <-
              new System.Net.Http.Headers.AuthenticationHeaderValue("token", token)
      client.DefaultRequestHeaders.Add("user-agent", sprintf "Paket (%s)" paketVersion)
      client
  
  #if USE_WEB_CLIENT_FOR_UPLOAD
  