def ledgers.at

ezx@1.11.0.0 · src/ws/relock.bend:198

import Base
import ezx@1.11.0.0/src/pkg/path.bend as P
import ezx@1.11.0.0/src/relock/relock.bend as R
import ezx@1.11.0.0/src/ws/workspace.bend as W
import ezx@1.11.0.0/src/ws/joint.bend as J

198# the ledgers once the command at `rel` writes `new`: the root's, at the
199# root, or the member's ez.toml under it
200def ledgers.at(rel: List<&2, String>, +new: String, +text: String, +fs: List<&2, J.Found>) -> Ledgers:
201  match rel:
202    case []:
203      Ledgers{new, fs}
204    case hd <> tl:
205      Ledgers{text, put.found(fs, P.join(W.segs.text(hd <> tl), R.toml()), new)}