def quarantined

cswap-bend-cli@0.1.0.0 · daemon/walk.bend:184

import Base
import cswap-bend-cli@0.1.0.0/json.bend as Json
import cswap-bend-cli@0.1.0.0/act.bend as Act
import cswap-bend-cli@0.1.0.0/store/base.bend as SBase
import cswap-bend-cli@0.1.0.0/daemon/tick.bend as Tk
import cswap-bend-cli@0.1.0.0/daemon/quarantine.bend as Q

184def quarantined(+w: W, tr: Trail, +o: Tk.Out, +slot: String, +email: String, +reason: String) -> Act.of(Move):
185  do ActM<Move>:
186    q : Json.Json <- Q.quarantine(SBase.root_of(Tk.env_ctx(w_env(w))), slot, email, reason, w_ts(w))
187    return MRetry{extend(tr, slot, [q], False{}, o)}