@@ -537,14 +537,15 @@ module VaultClient =
537537 )
538538 )
539539
540- let httpMessage =
540+ use httpMessage =
541541 new System.Net.Http.HttpRequestMessage (
542542 Method = System.Net.Http.HttpMethod.Get,
543543 RequestUri = uri
544544 )
545545
546546 let! response = client.SendAsync ( httpMessage, ct) |> Async.AwaitTask
547547 let response = response.EnsureSuccessStatusCode ()
548+ use response = response
548549 let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
549550
550551 let! jsonNode =
@@ -582,14 +583,15 @@ module VaultClient =
582583 System.Uri ( " v1/auth/jwt/login" , System.UriKind.Relative)
583584 )
584585
585- let httpMessage =
586+ use httpMessage =
586587 new System.Net.Http.HttpRequestMessage (
587588 Method = System.Net.Http.HttpMethod.Get,
588589 RequestUri = uri
589590 )
590591
591592 let! response = client.SendAsync ( httpMessage, ct) |> Async.AwaitTask
592593 let response = response.EnsureSuccessStatusCode ()
594+ use response = response
593595 let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
594596
595597 let! jsonNode =
@@ -649,14 +651,15 @@ module VaultClientNonExtensionMethod =
649651 )
650652 )
651653
652- let httpMessage =
654+ use httpMessage =
653655 new System.Net.Http.HttpRequestMessage (
654656 Method = System.Net.Http.HttpMethod.Get,
655657 RequestUri = uri
656658 )
657659
658660 let! response = client.SendAsync ( httpMessage, ct) |> Async.AwaitTask
659661 let response = response.EnsureSuccessStatusCode ()
662+ use response = response
660663 let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
661664
662665 let! jsonNode =
@@ -694,14 +697,15 @@ module VaultClientNonExtensionMethod =
694697 System.Uri ( " v1/auth/jwt/login" , System.UriKind.Relative)
695698 )
696699
697- let httpMessage =
700+ use httpMessage =
698701 new System.Net.Http.HttpRequestMessage (
699702 Method = System.Net.Http.HttpMethod.Get,
700703 RequestUri = uri
701704 )
702705
703706 let! response = client.SendAsync ( httpMessage, ct) |> Async.AwaitTask
704707 let response = response.EnsureSuccessStatusCode ()
708+ use response = response
705709 let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
706710
707711 let! jsonNode =
@@ -764,14 +768,15 @@ module VaultClientExtensionMethodHttpClientExtension =
764768 )
765769 )
766770
767- let httpMessage =
771+ use httpMessage =
768772 new System.Net.Http.HttpRequestMessage (
769773 Method = System.Net.Http.HttpMethod.Get,
770774 RequestUri = uri
771775 )
772776
773777 let! response = client.SendAsync ( httpMessage, ct) |> Async.AwaitTask
774778 let response = response.EnsureSuccessStatusCode ()
779+ use response = response
775780 let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
776781
777782 let! jsonNode =
@@ -809,14 +814,15 @@ module VaultClientExtensionMethodHttpClientExtension =
809814 System.Uri ( " v1/auth/jwt/login" , System.UriKind.Relative)
810815 )
811816
812- let httpMessage =
817+ use httpMessage =
813818 new System.Net.Http.HttpRequestMessage (
814819 Method = System.Net.Http.HttpMethod.Get,
815820 RequestUri = uri
816821 )
817822
818823 let! response = client.SendAsync ( httpMessage, ct) |> Async.AwaitTask
819824 let response = response.EnsureSuccessStatusCode ()
825+ use response = response
820826 let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
821827
822828 let! jsonNode =
0 commit comments