@effect/platform 0.73.0 → 0.74.0

package/src/HttpClient.ts

@@ -719,6 +719,34 @@ export const tap: {
   ): HttpClient.With<E | E2, R | R2>
 } = internal.tap
 
+/**
+ * Performs an additional effect after an unsuccessful request.
+ *
+ * @since 1.0.0
+ * @category mapping & sequencing
+ */
+export const tapError: {
+  /**
+   * Performs an additional effect after an unsuccessful request.
+   *
+   * @since 1.0.0
+   * @category mapping & sequencing
+   */
+  <_, E, E2, R2>(
+    f: (e: NoInfer<E>) => Effect.Effect<_, E2, R2>
+  ): <R>(self: HttpClient.With<E, R>) => HttpClient.With<E | E2, R | R2>
+  /**
+   * Performs an additional effect after an unsuccessful request.
+   *
+   * @since 1.0.0
+   * @category mapping & sequencing
+   */
+  <E, R, _, E2, R2>(
+    self: HttpClient.With<E, R>,
+    f: (e: NoInfer<E>) => Effect.Effect<_, E2, R2>
+  ): HttpClient.With<E | E2, R | R2>
+} = internal.tapError
+
 /**
  * Performs an additional effect on the request before sending it.
  *

package/src/HttpMethod.ts

@@ -33,3 +33,27 @@ export declare namespace HttpMethod {
  * @since 1.0.0
  */
 export const hasBody = (method: HttpMethod): boolean => method !== "GET" && method !== "HEAD" && method !== "OPTIONS"
+
+/**
+ * @since 1.0.0
+ */
+export const all: ReadonlySet<HttpMethod> = new Set(["GET", "POST", "PUT", "DELETE", "PATCH", "HEAD", "OPTIONS"])
+
+/**
+ * Tests if a value is a `HttpMethod`.
+ *
+ * @param input - The value to test.
+ *
+ * @example
+ * ```ts
+ * import { HttpMethod } from "@effect/platform"
+ *
+ * assert.deepStrictEqual(HttpMethod.isHttpMethod("GET"), true)
+ * assert.deepStrictEqual(HttpMethod.isHttpMethod("get"), false)
+ * assert.deepStrictEqual(HttpMethod.isHttpMethod(1), false)
+ * ```
+ *
+ * @since 1.0.0
+ * @category refinements
+ */
+export const isHttpMethod = (u: unknown): u is HttpMethod => all.has(u as HttpMethod)

package/src/OpenApi.ts

@@ -403,7 +403,7 @@ export const fromApi = <Id extends string, Groups extends HttpApiGroup.Any, E, R
       processResponseMap(successes, () => "Success")
       processResponseMap(errors, () => "Error")
 
-      const path = endpoint.path.replace(/:(\w+)[^/]*/g, "{$1}")
+      const path = endpoint.path.replace(/:(\w+)/g, "{$1}")
       const method = endpoint.method.toLowerCase() as OpenAPISpecMethodName
       if (!spec.paths[path]) {
         spec.paths[path] = {}

package/src/internal/httpClient.ts

@@ -621,6 +621,17 @@ export const tap = dual<
   ) => Client.HttpClient.With<E | E2, R | R2>
 >(2, (self, f) => transformResponse(self, Effect.tap(f)))
 
+/** @internal */
+export const tapError = dual<
+  <_, E, E2, R2>(
+    f: (e: NoInfer<E>) => Effect.Effect<_, E2, R2>
+  ) => <R>(self: Client.HttpClient.With<E, R>) => Client.HttpClient.With<E | E2, R | R2>,
+  <E, R, _, E2, R2>(
+    self: Client.HttpClient.With<E, R>,
+    f: (e: NoInfer<E>) => Effect.Effect<_, E2, R2>
+  ) => Client.HttpClient.With<E | E2, R | R2>
+>(2, (self, f) => transformResponse(self, Effect.tapError(f)))
+
 /** @internal */
 export const tapRequest = dual<
   <_, E2, R2>(