Revert "Log Request performance"

This reverts commit 8968df9.

src/Paket.Core/NuGetV2.fs

@@ -62,57 +62,47 @@ let rec private followODataLink auth url =
     }
 
 
-
 let tryGetAllVersionsFromNugetODataWithFilter (auth, nugetURL, package:PackageName) = 
     async { 
         try 
-            let sw = System.Diagnostics.Stopwatch.StartNew()
             let url = sprintf "%s/Packages?$filter=Id eq '%O'" nugetURL package
             verbosefn "getAllVersionsFromNugetODataWithFilter from url '%s'" url
             let! result = followODataLink auth url
-            traceVerbose <| sprintf "PERF: ODataWithFilter %O: %dms" package sw.ElapsedMilliseconds
             return Some result
         with _ -> return None
     }
 
 let tryGetPackageVersionsViaOData (auth, nugetURL, package:PackageName) = 
     async { 
         try 
-            let sw = System.Diagnostics.Stopwatch.StartNew()
             let url = sprintf "%s/FindPackagesById()?id='%O'" nugetURL package
             verbosefn "getAllVersionsFromNugetOData from url '%s'" url
             let! result = followODataLink auth url
-            traceVerbose <| sprintf "PERF: OData %O: %dms" package sw.ElapsedMilliseconds
             return Some result
         with _ -> return None
     }
 
 let tryGetPackageVersionsViaJson (auth, nugetURL, package:PackageName) = 
     async { 
-        let sw = System.Diagnostics.Stopwatch.StartNew() 
         let url = sprintf "%s/package-versions/%O?includePrerelease=true" nugetURL package
         let! raw = safeGetFromUrl (auth, url, acceptJson)
 
         match raw with
         | None -> return None
         | Some data -> 
             try 
-                traceVerbose <| sprintf "PERF: json %O: %dms" package sw.ElapsedMilliseconds
                 return Some(JsonConvert.DeserializeObject<string []> data)
             with _ -> return None
     }
 
 let tryNuGetV3 (auth, nugetV3Url, package:PackageName) = 
-    async {
-        try
-            let sw = System.Diagnostics.Stopwatch.StartNew()
+    async { 
+        try 
             let! data = NuGetV3.findVersionsForPackage(nugetV3Url, auth, package, true, 100000)
             match data with
             | Some data when Array.isEmpty data -> return None
             | None -> return None
-            | _ -> 
-                traceVerbose <| sprintf "PERF: V3 %O: %dms" package sw.ElapsedMilliseconds
-                return data
+            | _ -> return data
         with exn -> return None
     }
 

src/Paket.Core/Utils.fs

@@ -270,10 +270,8 @@ let safeGetFromUrl (auth:Auth option, url : string, contentType : string) =
             if notNullOrEmpty contentType then
                 client.Headers.Add(HttpRequestHeader.Accept, contentType)
 
-            let sw2 = System.Diagnostics.Stopwatch.StartNew()
             let s = client.DownloadStringTaskAsync(uri) |> Async.AwaitTask
             let! raw = s
-            traceVerbose <| sprintf "  - download was %dms" sw2.ElapsedMilliseconds
             return Some raw
         with _ -> return None
     }