def redirect.split.of
import emerging-ezhttp@0.21.0.0/src/redirect.bend as Redirectimport Base
import emerging-ezhttp@0.21.0.0/src/http.bend as Http
114# a Location divided at its first `?`
115def redirect.split.of(c: Http.Cut, loc: String) -> Ref:
116 match c:
117 case Http.NoCut{}:
118 Ref{loc, ""}
119 case Http.Cut{before, after}:
120 Ref{before, "?" ++ after}