diff options
| author | Clombrong <cromblong@egregore.fun> | 2025-08-15 00:17:29 +0200 |
|---|---|---|
| committer | Clombrong <cromblong@egregore.fun> | 2025-08-15 00:17:29 +0200 |
| commit | 383928958376423d8588888386b52e4a8b30d8da (patch) | |
| tree | 5edd1dcb637e1de8b3c2276978db9134d57ea36f /portal/ws/portal.ml | |
| parent | e9c9de288d9934a252dcef58b935ce6e145a65cd (diff) | |
feat!(portal): remove domain field from Portal.header (useless now)
Diffstat (limited to 'portal/ws/portal.ml')
| -rw-r--r-- | portal/ws/portal.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/portal/ws/portal.ml b/portal/ws/portal.ml index 636cb89..8d490cc 100644 --- a/portal/ws/portal.ml +++ b/portal/ws/portal.ml @@ -31,7 +31,7 @@ let well_known_of (domain : string) = "https://" ^ domain ^ "/.well-known/host-m (** [open_stanza domain] is an <open /> stanza for [domain]. If [from] is specified, the <open /> stanza has the from parameter. *) -let header ?from domain {stream; push; _} = +let header ?from {domain; stream; push; _} = let stanza = let attributes = let open Option in |