def keep.parsed
import ezx@1.11.0.0/src/ws/relock.bend as Relockimport Base
import ezx@1.11.0.0/src/ledger/manifest.bend as M
import ezx@1.11.0.0/src/ws/workspace.bend as W
import ezx@1.11.0.0/src/ws/up.bend as U
104# a ledger the command writes at the root, once it is read: as the root's
105# with the table it had, or as it is when it does not read
106def keep.parsed(rd: M.Read, +spec: W.Spec, root: W.Root, +text: String) -> String:
107 match rd:
108 case M.Good{mm}:
109 U.root.text(mm, spec, root)
110 case M.Bad{_why}:
111 text