fix deprecation warnings for result.then

Author: yoshi-monster

src/gleam/http/cookie.gleam

@@ -105,8 +105,8 @@ pub fn parse(cookie_string: String) -> List(#(String, String)) {
       Ok(#(key, value)) -> {
         let key = string.trim(key)
         let value = string.trim(value)
-        use _ <- result.then(check_token(key))
-        use _ <- result.then(check_token(value))
+        use _ <- result.try(check_token(key))
+        use _ <- result.try(check_token(value))
         Ok(#(key, value))
       }
       Error(Nil) -> Error(Nil)

src/gleam/http/request.gleam

@@ -10,7 +10,7 @@ import gleam/uri.{type Uri, Uri}
 ///
 /// The body of the request is parameterised. The HTTP server or client you are
 /// using will have a particular set of types it supports for the body.
-/// 
+///
 pub type Request(body) {
   Request(
     method: Method,
@@ -42,12 +42,12 @@ pub fn to_uri(request: Request(a)) -> Uri {
 /// Construct a request from a URI.
 ///
 pub fn from_uri(uri: Uri) -> Result(Request(String), Nil) {
-  use scheme <- result.then(
+  use scheme <- result.try(
     uri.scheme
     |> option.unwrap("")
     |> http.scheme_from_string,
   )
-  use host <- result.then(
+  use host <- result.try(
     uri.host
     |> option.to_result(Nil),
   )
@@ -216,7 +216,7 @@ pub fn new() -> Request(String) {
 pub fn to(url: String) -> Result(Request(String), Nil) {
   url
   |> uri.parse
-  |> result.then(from_uri)
+  |> result.try(from_uri)
 }
 
 /// Set the scheme (protocol) of the request.

src/gleam/http/response.gleam

@@ -9,7 +9,7 @@ import gleam/string
 ///
 /// The body of the request is parameterised. The HTTP server or client you are
 /// using will have a particular set of types it supports for the body.
-/// 
+///
 pub type Response(body) {
   Response(
     status: Int,
@@ -28,7 +28,7 @@ pub fn try_map(
   response: Response(old_body),
   transform: fn(old_body) -> Result(new_body, error),
 ) -> Result(Response(new_body), error) {
-  use body <- result.then(transform(response.body))
+  use body <- result.try(transform(response.body))
   Ok(set_body(response, body))
 }
 
@@ -113,7 +113,7 @@ pub fn redirect(uri: String) -> Response(String) {
   )
 }
 
-/// Fetch the cookies sent in a response. 
+/// Fetch the cookies sent in a response.
 ///
 /// Badly formed cookies will be discarded.
 ///

src/gleam/http/service.gleam

@@ -39,9 +39,9 @@ fn ensure_post(req: Request(a)) {
 }
 
 fn get_override_method(request: Request(t)) -> Result(http.Method, Nil) {
-  use query_params <- result.then(request.get_query(request))
-  use method <- result.then(list.key_find(query_params, "_method"))
-  use method <- result.then(http.parse_method(method))
+  use query_params <- result.try(request.get_query(request))
+  use method <- result.try(list.key_find(query_params, "_method"))
+  use method <- result.try(http.parse_method(method))
   case method {
     Put | Patch | Delete -> Ok(method)
     _ -> Error(Nil)
@@ -53,7 +53,7 @@ pub fn method_override(service) {
   fn(request) {
     request
     |> ensure_post
-    |> result.then(get_override_method)
+    |> result.try(get_override_method)
     |> result.map(request.set_method(request, _))
     |> result.unwrap(request)
     |> service