Handle Respondable defects in toResponseOrElseDefect (#4896)

Author: seniorkonung

.changeset/silent-yaks-behave.md

@@ -0,0 +1,5 @@
+---
+"@effect/platform": patch
+---
+
+Handle `Respondable` defects in `toResponseOrElseDefect`

packages/platform/src/HttpServerRespondable.ts

@@ -67,6 +67,8 @@ export const toResponseOrElse = (u: unknown, orElse: HttpServerResponse): Effect
 export const toResponseOrElseDefect = (u: unknown, orElse: HttpServerResponse): Effect.Effect<HttpServerResponse> => {
   if (ServerResponse.isServerResponse(u)) {
     return Effect.succeed(u)
+  } else if (isRespondable(u)) {
+    return Effect.catchAllCause(u[symbol](), () => Effect.succeed(orElse))
   }
   return Effect.succeed(orElse)
 }