anchor.diff:                  request.UserAgent <- "Paket"
                   request.UseDefaultCredentials <- true
                   request.Proxy <- Utils.getDefaultProxyFor licenseUrl
  +                request.Timeout <- 3000
                   use! httpResponse = request.AsyncGetResponse()
               
                   use httpResponseStream = httpResponse.GetResponseStream()
  
positive.code:                     let! bytes = httpResponseStream.AsyncRead(buffer, 0, bufferSize)
                      bytesRead := bytes
                      do! fileStream.AsyncWrite(buffer, 0, !bytesRead)
                                  
                  do! DownloadLicense(root,force,name,version,nugetPackage.LicenseUrl,licenseFileName)
              with
              | exn -> failwithf "Could not download %s %A.%s    %s" name version Environment.NewLine exn.Message
                  
  
negative.code:             // discover the link on the fly
              let! nugetPackage = getDetailsFromNuget force auth url name version
              try
                  let! license = Async.StartChild(DownloadLicense(root,force,name,version,nugetPackage.LicenseUrl,licenseFileName), 3000)
  
                  tracefn "Downloading %s %A to %s" name version targetFileName
  
                  let request = HttpWebRequest.Create(Uri nugetPackage.DownloadUrl) :?> HttpWebRequest
  