def set.act

cswap-bend-cli@0.1.0.0 · setcmd.bend:119

import Base
import cswap-bend-cli@0.1.0.0/setwrite.bend as Setwrite
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/cmd.bend as Cmd
import cswap-bend-cli@0.1.0.0/settings.bend as Settings

119def set.act(+root: String, +sp: Settings.Spec, +v: Json.Json) -> Act.of(Cmd.Out):
120  do ActM<Cmd.Out>:
121    +raw : Json.Json <- load_raw_w(root)
122    w : Unit <- write_settings(root, Setwrite.set_in(raw, sp, v))
123    Act.pure(Cmd.Out, Cmd.ok(set.msg(sp, v)))