@fieldia/core 0.30.1 → 0.31.0

package/src/lib/record/payment-form.mjs

@@ -0,0 +1,95 @@
+import { functionTable } from '../expression/app-functions.mjs';
+import { compileModifier } from '../expression/modifier.mjs';
+/** A key no other payment has: the provider's idempotency key, the same for every try of one response's payment. */
+const newKey = () => `pay-${Date.now().toString(36)}-${Math.random().toString(36).slice(2, 10)}`;
+/**
+ * The pay part's side of a form (`payment` on its page): what is due — the amount, a number or a field's; its currency,
+ * a code or a field's, else a money field's own; while `when` holds, above 0 — taken before the answers go, once the
+ * form's own checks found nothing; not taken, nothing is sent; taken, the send carries it (`payment`).
+ */
+export function join(host) {
+    const { form, page, options, messages, set } = host;
+    const payment = page.payment;
+    const source = options.dataSource;
+    let key = newKey();
+    let shown;
+    let when;
+    /** A field's value by name, where the page has that field; else the setting itself. */
+    const read = (setting) => (typeof setting === 'string' && setting in page.fields ? form.getState().values[setting] : setting);
+    const kit = {
+        due() {
+            if (!payment || !source?.pay)
+                return null;
+            if (payment.when) {
+                const { context, env } = host.reading();
+                if (!(when ??= compileModifier(payment.when, functionTable(options.functions))).evaluate(context, env))
+                    return null;
+            }
+            const amount = read(payment.amount);
+            if (typeof amount !== 'number' || !Number.isFinite(amount) || amount <= 0)
+                return null;
+            const field = typeof payment.amount === 'string' ? page.fields[payment.amount] : undefined;
+            const own = field?.type === 'monetary' ? (field.currency ?? (field.currencyField ? form.getState().values[field.currencyField] : undefined)) : undefined;
+            const written = payment.currency !== undefined ? read(payment.currency) : own;
+            const currency = typeof written === 'string' ? written : written && typeof written === 'object' && 'label' in written ? String(written.label) : '';
+            if (!/^[A-Z]{3}$/.test(currency))
+                return null;
+            return { amount, currency, label: payment.label, ...(payment.description ? { description: payment.description } : {}), key };
+        },
+        covered(due) {
+            const paid = form.getState().paid;
+            return !!paid && paid.key === due.key && paid.amount === due.amount && paid.currency === due.currency;
+        },
+        async pay(due) {
+            const state = form.getState();
+            const request = {
+                pageId: page.id,
+                model: page.data.kind === 'record' ? page.data.model : '',
+                recordId: state.recordId ?? null,
+                amount: due.amount,
+                currency: due.currency,
+                label: due.label,
+                ...(due.description ? { description: due.description } : {}),
+                key: due.key,
+                // The values as the send will carry them — hidden fields and those a link filled among them: what a checkout
+                // fills its own boxes from, and a campaign's code it may price by.
+                values: host.sending(),
+                language: page.language ?? messages.locale,
+            };
+            let paid = null;
+            const step = shown ?? options.host?.pay;
+            if (step)
+                paid = await step(due, request);
+            else if (source?.pay) {
+                const answer = await source.pay(request);
+                paid = answer.status === 'paid' ? { amount: due.amount, currency: due.currency, key: due.key, ...(answer.reference ? { reference: answer.reference } : {}) } : null;
+            }
+            if (paid)
+                set({ paid });
+            return paid;
+        },
+        step(step) {
+            shown = step;
+        },
+        // Before a send the form's own checks let go: what is due taken, or nothing sent.
+        async before(problems) {
+            if (Object.keys(problems).length)
+                return;
+            const due = kit.due();
+            if (due && !kit.covered(due) && !(await kit.pay(due)))
+                return false;
+            return undefined;
+        },
+        around(kind, sent, go) {
+            const paid = form.getState().paid;
+            return go(kind !== 'upload' && paid ? { ...sent, payment: paid } : sent);
+        },
+        // Another response, or another record: a payment of its own, by a new key.
+        reset() {
+            key = newKey();
+            set({ paid: null });
+        },
+    };
+    return kit;
+}
+//# sourceMappingURL=payment-form.mjs.map

package/src/lib/record/payment-form.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"payment-form.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/record/payment-form.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,aAAa,EAAE,MAAM,6BAA6B,CAAC;AAC5D,OAAO,EAAE,eAAe,EAAyB,MAAM,wBAAwB,CAAC;AAuBhF,oHAAoH;AACpH,MAAM,MAAM,GAAG,GAAG,EAAE,CAAC,OAAO,IAAI,CAAC,GAAG,EAAE,CAAC,QAAQ,CAAC,EAAE,CAAC,IAAI,IAAI,CAAC,MAAM,EAAE,CAAC,QAAQ,CAAC,EAAE,CAAC,CAAC,KAAK,CAAC,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC;AAEjG;;;;GAIG;AACH,MAAM,UAAU,IAAI,CAAC,IAAe;IAClC,MAAM,EAAE,IAAI,EAAE,IAAI,EAAE,OAAO,EAAE,QAAQ,EAAE,GAAG,EAAE,GAAG,IAAI,CAAC;IACpD,MAAM,OAAO,GAAG,IAAI,CAAC,OAAO,CAAC;IAC7B,MAAM,MAAM,GAAG,OAAO,CAAC,UAAU,CAAC;IAClC,IAAI,GAAG,GAAG,MAAM,EAAE,CAAC;IACnB,IAAI,KAA0B,CAAC;IAC/B,IAAI,IAAkC,CAAC;IACvC,uFAAuF;IACvF,MAAM,IAAI,GAAG,CAAC,OAAoC,EAAE,EAAE,CAAC,CAAC,OAAO,OAAO,KAAK,QAAQ,IAAI,OAAO,IAAI,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,QAAQ,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC;IAC3J,MAAM,GAAG,GAAgB;QACvB,GAAG;YACD,IAAI,CAAC,OAAO,IAAI,CAAC,MAAM,EAAE,GAAG;gBAAE,OAAO,IAAI,CAAC;YAC1C,IAAI,OAAO,CAAC,IAAI,EAAE,CAAC;gBACjB,MAAM,EAAE,OAAO,EAAE,GAAG,EAAE,GAAG,IAAI,CAAC,OAAO,EAAE,CAAC;gBACxC,IAAI,CAAC,CAAC,IAAI,KAAK,eAAe,CAAC,OAAO,CAAC,IAAI,EAAE,aAAa,CAAC,OAAO,CAAC,SAAS,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,OAAO,EAAE,GAAG,CAAC;oBAAE,OAAO,IAAI,CAAC;YACtH,CAAC;YACD,MAAM,MAAM,GAAG,IAAI,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC;YACpC,IAAI,OAAO,MAAM,KAAK,QAAQ,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,MAAM,CAAC,IAAI,MAAM,IAAI,CAAC;gBAAE,OAAO,IAAI,CAAC;YACvF,MAAM,KAAK,GAAG,OAAO,OAAO,CAAC,MAAM,KAAK,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;YAC3F,MAAM,GAAG,GAAG,KAAK,EAAE,IAAI,KAAK,UAAU,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,IAAI,CAAC,KAAK,CAAC,aAAa,CAAC,CAAC,CAAC,IAAI,CAAC,QAAQ,EAAE,CAAC,MAAM,CAAC,KAAK,CAAC,aAAa,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;YACzJ,MAAM,OAAO,GAAG,OAAO,CAAC,QAAQ,KAAK,SAAS,CAAC,CAAC,CAAC,IAAI,CAAC,OAAO,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC;YAC9E,MAAM,QAAQ,GAAG,OAAO,OAAO,KAAK,QAAQ,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,OAAO,IAAI,OAAO,OAAO,KAAK,QAAQ,IAAI,OAAO,IAAI,OAAO,CAAC,CAAC,CAAC,MAAM,CAAE,OAA8B,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC;YAC3K,IAAI,CAAC,YAAY,CAAC,IAAI,CAAC,QAAQ,CAAC;gBAAE,OAAO,IAAI,CAAC;YAC9C,OAAO,EAAE,MAAM,EAAE,QAAQ,EAAE,KAAK,EAAE,OAAO,CAAC,KAAK,EAAE,GAAG,CAAC,OAAO,CAAC,WAAW,CAAC,CAAC,CAAC,EAAE,WAAW,EAAE,OAAO,CAAC,WAAW,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC;QAC/H,CAAC;QACD,OAAO,CAAC,GAAG;YACT,MAAM,IAAI,GAAG,IAAI,CAAC,QAAQ,EAAE,CAAC,IAAI,CAAC;YAClC,OAAO,CAAC,CAAC,IAAI,IAAI,IAAI,CAAC,GAAG,KAAK,GAAG,CAAC,GAAG,IAAI,IAAI,CAAC,MAAM,KAAK,GAAG,CAAC,MAAM,IAAI,IAAI,CAAC,QAAQ,KAAK,GAAG,CAAC,QAAQ,CAAC;QACxG,CAAC;QACD,KAAK,CAAC,GAAG,CAAC,GAAG;YACX,MAAM,KAAK,GAAG,IAAI,CAAC,QAAQ,EAAE,CAAC;YAC9B,MAAM,OAAO,GAAe;gBAC1B,MAAM,EAAE,IAAI,CAAC,EAAE;gBACf,KAAK,EAAE,IAAI,CAAC,IAAI,CAAC,IAAI,KAAK,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,EAAE;gBACzD,QAAQ,EAAE,KAAK,CAAC,QAAQ,IAAI,IAAI;gBAChC,MAAM,EAAE,GAAG,CAAC,MAAM;gBAClB,QAAQ,EAAE,GAAG,CAAC,QAAQ;gBACtB,KAAK,EAAE,GAAG,CAAC,KAAK;gBAChB,GAAG,CAAC,GAAG,CAAC,WAAW,CAAC,CAAC,CAAC,EAAE,WAAW,EAAE,GAAG,CAAC,WAAW,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC;gBAC5D,GAAG,EAAE,GAAG,CAAC,GAAG;gBACZ,6GAA6G;gBAC7G,mEAAmE;gBACnE,MAAM,EAAE,IAAI,CAAC,OAAO,EAAE;gBACtB,QAAQ,EAAE,IAAI,CAAC,QAAQ,IAAI,QAAQ,CAAC,MAAM;aAC3C,CAAC;YACF,IAAI,IAAI,GAAuB,IAAI,CAAC;YACpC,MAAM,IAAI,GAAG,KAAK,IAAI,OAAO,CAAC,IAAI,EAAE,GAAG,CAAC;YACxC,IAAI,IAAI;gBAAE,IAAI,GAAG,MAAM,IAAI,CAAC,GAAG,EAAE,OAAO,CAAC,CAAC;iBACrC,IAAI,MAAM,EAAE,GAAG,EAAE,CAAC;gBACrB,MAAM,MAAM,GAAG,MAAM,MAAM,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC;gBACzC,IAAI,GAAG,MAAM,CAAC,MAAM,KAAK,MAAM,CAAC,CAAC,CAAC,EAAE,MAAM,EAAE,GAAG,CAAC,MAAM,EAAE,QAAQ,EAAE,GAAG,CAAC,QAAQ,EAAE,GAAG,EAAE,GAAG,CAAC,GAAG,EAAE,GAAG,CAAC,MAAM,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,SAAS,EAAE,MAAM,CAAC,SAAS,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC;YACtK,CAAC;YACD,IAAI,IAAI;gBAAE,GAAG,CAAC,EAAE,IAAI,EAAE,CAAC,CAAC;YACxB,OAAO,IAAI,CAAC;QACd,CAAC;QACD,IAAI,CAAC,IAAI;YACP,KAAK,GAAG,IAAI,CAAC;QACf,CAAC;QACD,kFAAkF;QAClF,KAAK,CAAC,MAAM,CAAC,QAAQ;YACnB,IAAI,MAAM,CAAC,IAAI,CAAC,QAAQ,CAAC,CAAC,MAAM;gBAAE,OAAO;YACzC,MAAM,GAAG,GAAG,GAAG,CAAC,GAAG,EAAE,CAAC;YACtB,IAAI,GAAG,IAAI,CAAC,GAAG,CAAC,OAAO,CAAC,GAAG,CAAC,IAAI,CAAC,CAAC,MAAM,GAAG,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;gBAAE,OAAO,KAAK,CAAC;YACpE,OAAO,SAAS,CAAC;QACnB,CAAC;QACD,MAAM,CAAC,IAAI,EAAE,IAAI,EAAE,EAAE;YACnB,MAAM,IAAI,GAAG,IAAI,CAAC,QAAQ,EAAE,CAAC,IAAI,CAAC;YAClC,OAAO,EAAE,CAAC,IAAI,KAAK,QAAQ,IAAI,IAAI,CAAC,CAAC,CAAC,EAAE,GAAG,IAAI,EAAE,OAAO,EAAE,IAAI,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;QAC3E,CAAC;QACD,2EAA2E;QAC3E,KAAK;YACH,GAAG,GAAG,MAAM,EAAE,CAAC;YACf,GAAG,CAAC,EAAE,IAAI,EAAE,IAAI,EAAE,CAAC,CAAC;QACtB,CAAC;KACF,CAAC;IACF,OAAO,GAAG,CAAC;AACb,CAAC"}

package/src/lib/record/prefill-part.d.mts

@@ -0,0 +1,7 @@
+/**
+ * The prefill part (joins.ts): a link's parameters read as the fields they fill, and its side of a form — those fields
+ * laid where it starts, the hidden ones sent with the answers (link-values.ts). In the one-tag script it comes as
+ * fieldia.prefill.js, with the page checks of a page's `prefill` (prefill-checks.ts), asked for by a form whose page
+ * fills fields from its link.
+ */
+export { join, linkParams, linkValue, linkValues } from './link-values.mjs';

package/src/lib/record/prefill-part.d.ts

@@ -0,0 +1,7 @@
+/**
+ * The prefill part (joins.ts): a link's parameters read as the fields they fill, and its side of a form — those fields
+ * laid where it starts, the hidden ones sent with the answers (link-values.ts). In the one-tag script it comes as
+ * fieldia.prefill.js, with the page checks of a page's `prefill` (prefill-checks.ts), asked for by a form whose page
+ * fills fields from its link.
+ */
+export { join, linkParams, linkValue, linkValues } from './link-values';

package/src/lib/record/prefill-part.js

@@ -0,0 +1,15 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.linkValues = exports.linkValue = exports.linkParams = exports.join = void 0;
+/**
+ * The prefill part (joins.ts): a link's parameters read as the fields they fill, and its side of a form — those fields
+ * laid where it starts, the hidden ones sent with the answers (link-values.ts). In the one-tag script it comes as
+ * fieldia.prefill.js, with the page checks of a page's `prefill` (prefill-checks.ts), asked for by a form whose page
+ * fills fields from its link.
+ */
+var link_values_1 = require("./link-values");
+Object.defineProperty(exports, "join", { enumerable: true, get: function () { return link_values_1.join; } });
+Object.defineProperty(exports, "linkParams", { enumerable: true, get: function () { return link_values_1.linkParams; } });
+Object.defineProperty(exports, "linkValue", { enumerable: true, get: function () { return link_values_1.linkValue; } });
+Object.defineProperty(exports, "linkValues", { enumerable: true, get: function () { return link_values_1.linkValues; } });
+//# sourceMappingURL=prefill-part.js.map

package/src/lib/record/prefill-part.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"prefill-part.js","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/record/prefill-part.ts"],"names":[],"mappings":";;;AAAA;;;;;GAKG;AACH,6CAAwE;AAA/D,mGAAA,IAAI,OAAA;AAAE,yGAAA,UAAU,OAAA;AAAE,wGAAA,SAAS,OAAA;AAAE,yGAAA,UAAU,OAAA"}

package/src/lib/record/prefill-part.mjs

@@ -0,0 +1,8 @@
+/**
+ * The prefill part (joins.ts): a link's parameters read as the fields they fill, and its side of a form — those fields
+ * laid where it starts, the hidden ones sent with the answers (link-values.ts). In the one-tag script it comes as
+ * fieldia.prefill.js, with the page checks of a page's `prefill` (prefill-checks.ts), asked for by a form whose page
+ * fills fields from its link.
+ */
+export { join, linkParams, linkValue, linkValues } from './link-values.mjs';
+//# sourceMappingURL=prefill-part.mjs.map

package/src/lib/record/prefill-part.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"prefill-part.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/record/prefill-part.ts"],"names":[],"mappings":"AAAA;;;;;GAKG;AACH,OAAO,EAAE,IAAI,EAAE,UAAU,EAAE,SAAS,EAAE,UAAU,EAAE,MAAM,eAAe,CAAC"}

package/src/lib/record/press-undo.d.mts

@@ -0,0 +1,42 @@
+import type { ButtonNode, MenuItem, PressUndo, StatButton } from '../format/layout.mjs';
+import { type PressTaken, type RunResult, type RunScope, type UndoKit } from './run.mjs';
+import type { Fields } from '../format/field.mjs';
+import type { FormInner } from './joins.mjs';
+import { type Value, type Values } from './values.mjs';
+/** What a press did, as Undo takes it back: the values it changed (each before and after), and whether it saved them. */
+export interface PressDone extends Pick<PressTaken, 'app' | 'archived'> {
+    wrote: Map<string, {
+        before: Value;
+        after: Value;
+    }>;
+    saved?: boolean;
+}
+/**
+ * What a press did, read as it ends against the values it began with (`PressTaken.at`): each field it changed — a
+ * value worked out aside, which follows — and whether it saved them (the record holds no change left to save).
+ */
+export declare function pressDone(taken: PressTaken, now: Values, fields: Fields, saved: boolean): PressDone;
+/**
+ * Take back what a press did (`PressTaken`), as its toast's Undo asks: the app's own undos, latest first, each
+ * answered as a call is; the record it archived brought back, or the reverse; then the values its steps and the
+ * app's answers wrote put back — each only while it holds what they left, a change made since by anyone else staying
+ * — and saved again where the press saved. On the record the press was on: another shown since, nothing is done.
+ */
+export declare function takeBack(kit: UndoKit, taken: PressDone, scope: RunScope): Promise<RunResult>;
+/** What a press that offered Undo is said with once it ends, and what Undo is handed (form.ts). */
+export interface OfferContext {
+    kit: UndoKit;
+    source: ButtonNode | StatButton | MenuItem;
+    scope: RunScope;
+    taken: PressTaken;
+    result: RunResult;
+    offers: PressUndo | undefined;
+}
+/**
+ * A press that offers Undo has ended: the words it held are said — the last, once it ran whole, with Undo, where what
+ * it did can be taken back (its button's steps for it; else Fieldia's own taking back, where nothing it did is beyond
+ * it — a copy, a delete, a page opened, a post, the app's call answered with no undo; else the app's own undos) — or,
+ * with nothing said, "Done: {label}". Undo runs on the record the press ended on: another shown since, only the app's
+ * own undos run.
+ */
+export declare function offerUndo(inner: FormInner, context: OfferContext): void;

package/src/lib/record/press-undo.d.ts

@@ -0,0 +1,42 @@
+import type { ButtonNode, MenuItem, PressUndo, StatButton } from '../format/layout';
+import { type PressTaken, type RunResult, type RunScope, type UndoKit } from './run';
+import type { Fields } from '../format/field';
+import type { FormInner } from './joins';
+import { type Value, type Values } from './values';
+/** What a press did, as Undo takes it back: the values it changed (each before and after), and whether it saved them. */
+export interface PressDone extends Pick<PressTaken, 'app' | 'archived'> {
+    wrote: Map<string, {
+        before: Value;
+        after: Value;
+    }>;
+    saved?: boolean;
+}
+/**
+ * What a press did, read as it ends against the values it began with (`PressTaken.at`): each field it changed — a
+ * value worked out aside, which follows — and whether it saved them (the record holds no change left to save).
+ */
+export declare function pressDone(taken: PressTaken, now: Values, fields: Fields, saved: boolean): PressDone;
+/**
+ * Take back what a press did (`PressTaken`), as its toast's Undo asks: the app's own undos, latest first, each
+ * answered as a call is; the record it archived brought back, or the reverse; then the values its steps and the
+ * app's answers wrote put back — each only while it holds what they left, a change made since by anyone else staying
+ * — and saved again where the press saved. On the record the press was on: another shown since, nothing is done.
+ */
+export declare function takeBack(kit: UndoKit, taken: PressDone, scope: RunScope): Promise<RunResult>;
+/** What a press that offered Undo is said with once it ends, and what Undo is handed (form.ts). */
+export interface OfferContext {
+    kit: UndoKit;
+    source: ButtonNode | StatButton | MenuItem;
+    scope: RunScope;
+    taken: PressTaken;
+    result: RunResult;
+    offers: PressUndo | undefined;
+}
+/**
+ * A press that offers Undo has ended: the words it held are said — the last, once it ran whole, with Undo, where what
+ * it did can be taken back (its button's steps for it; else Fieldia's own taking back, where nothing it did is beyond
+ * it — a copy, a delete, a page opened, a post, the app's call answered with no undo; else the app's own undos) — or,
+ * with nothing said, "Done: {label}". Undo runs on the record the press ended on: another shown since, only the app's
+ * own undos run.
+ */
+export declare function offerUndo(inner: FormInner, context: OfferContext): void;

package/src/lib/record/press-undo.js

@@ -0,0 +1,115 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.pressDone = pressDone;
+exports.takeBack = takeBack;
+exports.offerUndo = offerUndo;
+const messages_1 = require("./messages");
+const run_1 = require("./run");
+const values_1 = require("./values");
+const wordsOf = (error) => (error instanceof Error ? error.message : String(error));
+/** The steps a press does that Fieldia cannot take back by itself: a copy, a delete, a form put back or closed, a page opened, an address, a post. */
+const BEYOND = /"do":"(duplicate|delete|reset|close|open|openUrl|post)"/;
+/**
+ * What a press did, read as it ends against the values it began with (`PressTaken.at`): each field it changed — a
+ * value worked out aside, which follows — and whether it saved them (the record holds no change left to save).
+ */
+function pressDone(taken, now, fields, saved) {
+    const wrote = new Map();
+    for (const name of new Set([...Object.keys(taken.at), ...Object.keys(now)])) {
+        if (fields[name]?.compute || (0, values_1.sameValue)(taken.at[name], now[name]))
+            continue;
+        wrote.set(name, { before: (taken.at[name] ?? null), after: (0, values_1.structuredCopy)(now[name] ?? null) });
+    }
+    return { app: taken.app, ...(taken.archived !== undefined ? { archived: taken.archived } : {}), wrote, ...(wrote.size && saved ? { saved } : {}) };
+}
+/**
+ * Take back what a press did (`PressTaken`), as its toast's Undo asks: the app's own undos, latest first, each
+ * answered as a call is; the record it archived brought back, or the reverse; then the values its steps and the
+ * app's answers wrote put back — each only while it holds what they left, a change made since by anyone else staying
+ * — and saved again where the press saved. On the record the press was on: another shown since, nothing is done.
+ */
+async function takeBack(kit, taken, scope) {
+    const { form, answered, recordStep, replaced, tell } = kit;
+    scope.generation ??= form.generation();
+    const ended = (stopped) => stopped ? { done: false, reason: stopped.reason, ...(stopped.message !== undefined ? { message: stopped.message } : {}), ...(stopped.error !== undefined ? { error: stopped.error } : {}) } : run_1.DONE;
+    try {
+        // The app's own, whatever record is shown now: what it answers is laid only on the one the press ended on.
+        for (const undo of [...taken.app].reverse()) {
+            let answer;
+            try {
+                answer = await undo();
+            }
+            catch (error) {
+                return ended({ reason: 'app', message: wordsOf(error), error });
+            }
+            if (!answer)
+                continue;
+            if (replaced(scope)) {
+                if (answer.say !== undefined)
+                    tell(null, typeof answer.say === 'string' ? answer.say : answer.say.message, (typeof answer.say === 'object' && answer.say.tone) || 'info');
+                continue;
+            }
+            const stopped = await answered(answer, scope);
+            if (stopped)
+                return ended(stopped);
+        }
+        if (taken.archived === undefined && !taken.wrote.size)
+            return run_1.DONE;
+        if (replaced(scope))
+            return ended(form.gone());
+        if (taken.archived !== undefined) {
+            const stopped = await recordStep(taken.archived ? 'unarchive' : 'archive', scope);
+            if (stopped)
+                return ended(stopped);
+        }
+        if (!taken.wrote.size)
+            return run_1.DONE;
+        const back = {};
+        for (const [name, { before, after }] of taken.wrote)
+            if ((0, values_1.sameValue)(form.values()[name], after))
+                back[name] = before;
+        if (Object.keys(back).length)
+            form.write(back, scope.chain);
+        return ended(taken.saved ? await form.save(scope.chain) : null);
+    }
+    catch (error) {
+        return ended({ reason: 'cannot', message: wordsOf(error), error });
+    }
+}
+/**
+ * A press that offers Undo has ended: the words it held are said — the last, once it ran whole, with Undo, where what
+ * it did can be taken back (its button's steps for it; else Fieldia's own taking back, where nothing it did is beyond
+ * it — a copy, a delete, a page opened, a post, the app's call answered with no undo; else the app's own undos) — or,
+ * with nothing said, "Done: {label}". Undo runs on the record the press ended on: another shown since, only the app's
+ * own undos run.
+ */
+function offerUndo(inner, context) {
+    const { kit, source, scope, taken, result, offers } = context;
+    const { messages } = inner;
+    const host = kit.form.host;
+    const done = pressDone(taken, kit.form.values(), inner.fields, !kit.form.changed());
+    const beyond = taken.beyond ?? BEYOND.exec(JSON.stringify([source.steps ?? [], 'builtin' in source ? { do: source.builtin } : {}]))?.[1];
+    const did = taken.app.length > 0 || taken.archived !== undefined || done.wrote.size > 0;
+    const can = result.done && (Array.isArray(offers) || (offers === true ? did && beyond === undefined : taken.app.length > 0));
+    const said = [...taken.said];
+    const builtin = 'builtin' in source ? source.builtin : undefined;
+    const plain = builtin === 'archive' ? messages.pressArchived : builtin === 'unarchive' ? messages.pressUnarchived : (0, messages_1.fillMessage)(messages, messages.pressDone, { label: source.label ?? '' });
+    const last = can ? (said.pop() ?? { message: plain, tone: 'success' }) : null;
+    for (const words of said)
+        host?.say(words.message, words.tone);
+    if (!last)
+        return;
+    const on = kit.form.generation();
+    const id = `${scope.id}.undo`;
+    host?.say(last.message, last.tone, {
+        undo: () => inner.track((async () => {
+            const again = { id, chain: [], typed: 'first', generation: on, ...(scope.recordIds ? { recordIds: [...scope.recordIds] } : {}) };
+            const steps = Array.isArray(offers) ? offers : [];
+            // Its steps, on the record the press ended on; else what it did, taken back.
+            const ended = Array.isArray(offers) ? (on === kit.form.generation() ? await kit.runSteps(offers, again) : { done: false, ...inner.replaced() }) : await takeBack(kit, offers === true ? done : { app: taken.app, wrote: new Map() }, again);
+            inner.emit('run', { id, steps, result: ended });
+            return ended;
+        })()),
+    });
+}
+//# sourceMappingURL=press-undo.js.map

package/src/lib/record/press-undo.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"press-undo.js","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/record/press-undo.ts"],"names":[],"mappings":";;AAsBA,8BAOC;AAQD,4BAoCC;AAmBD,8BA6BC;AAxHD,yCAAyC;AACzC,+BAA4H;AAG5H,qCAA8E;AAE9E,MAAM,OAAO,GAAG,CAAC,KAAc,EAAE,EAAE,CAAC,CAAC,KAAK,YAAY,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC;AAQ7F,sJAAsJ;AACtJ,MAAM,MAAM,GAAG,yDAAyD,CAAC;AAEzE;;;GAGG;AACH,SAAgB,SAAS,CAAC,KAAiB,EAAE,GAAW,EAAE,MAAc,EAAE,KAAc;IACtF,MAAM,KAAK,GAAG,IAAI,GAAG,EAA2C,CAAC;IACjE,KAAK,MAAM,IAAI,IAAI,IAAI,GAAG,CAAC,CAAC,GAAG,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,EAAE,CAAC,EAAE,GAAG,MAAM,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC;QAC5E,IAAI,MAAM,CAAC,IAAI,CAAC,EAAE,OAAO,IAAI,IAAA,kBAAS,EAAC,KAAK,CAAC,EAAE,CAAC,IAAI,CAAC,EAAE,GAAG,CAAC,IAAI,CAAC,CAAC;YAAE,SAAS;QAC5E,KAAK,CAAC,GAAG,CAAC,IAAI,EAAE,EAAE,MAAM,EAAE,CAAC,KAAK,CAAC,EAAE,CAAC,IAAI,CAAC,IAAI,IAAI,CAAU,EAAE,KAAK,EAAE,IAAA,uBAAc,EAAC,GAAG,CAAC,IAAI,CAAC,IAAI,IAAI,CAAU,EAAE,CAAC,CAAC;IACpH,CAAC;IACD,OAAO,EAAE,GAAG,EAAE,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,KAAK,CAAC,QAAQ,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,QAAQ,EAAE,KAAK,CAAC,QAAQ,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,KAAK,EAAE,GAAG,CAAC,KAAK,CAAC,IAAI,IAAI,KAAK,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC;AACrJ,CAAC;AAED;;;;;GAKG;AACI,KAAK,UAAU,QAAQ,CAAC,GAAY,EAAE,KAAgB,EAAE,KAAe;IAC9E,MAAM,EAAE,IAAI,EAAE,QAAQ,EAAE,UAAU,EAAE,QAAQ,EAAE,IAAI,EAAE,GAAG,GAAG,CAAC;IACzD,KAAK,CAAC,UAAU,KAAK,IAAI,CAAC,UAAU,EAAE,CAAC;IACvC,MAAM,KAAK,GAAG,CAAC,OAAuB,EAAa,EAAE,CACnD,OAAO,CAAC,CAAC,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,MAAM,EAAE,OAAO,CAAC,MAAM,EAAE,GAAG,CAAC,OAAO,CAAC,OAAO,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,OAAO,EAAE,OAAO,CAAC,OAAO,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,GAAG,CAAC,OAAO,CAAC,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,OAAO,CAAC,KAAK,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,UAAI,CAAC;IACrM,IAAI,CAAC;QACH,2GAA2G;QAC3G,KAAK,MAAM,IAAI,IAAI,CAAC,GAAG,KAAK,CAAC,GAAG,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC;YAC5C,IAAI,MAA2B,CAAC;YAChC,IAAI,CAAC;gBACH,MAAM,GAAG,MAAM,IAAI,EAAE,CAAC;YACxB,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,OAAO,KAAK,CAAC,EAAE,MAAM,EAAE,KAAK,EAAE,OAAO,EAAE,OAAO,CAAC,KAAK,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC;YAClE,CAAC;YACD,IAAI,CAAC,MAAM;gBAAE,SAAS;YACtB,IAAI,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC;gBACpB,IAAI,MAAM,CAAC,GAAG,KAAK,SAAS;oBAAE,IAAI,CAAC,IAAI,EAAE,OAAO,MAAM,CAAC,GAAG,KAAK,QAAQ,CAAC,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,OAAO,EAAE,CAAC,OAAO,MAAM,CAAC,GAAG,KAAK,QAAQ,IAAI,MAAM,CAAC,GAAG,CAAC,IAAI,CAAC,IAAI,MAAM,CAAC,CAAC;gBAC1K,SAAS;YACX,CAAC;YACD,MAAM,OAAO,GAAG,MAAM,QAAQ,CAAC,MAAM,EAAE,KAAK,CAAC,CAAC;YAC9C,IAAI,OAAO;gBAAE,OAAO,KAAK,CAAC,OAAO,CAAC,CAAC;QACrC,CAAC;QACD,IAAI,KAAK,CAAC,QAAQ,KAAK,SAAS,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI;YAAE,OAAO,UAAI,CAAC;QACnE,IAAI,QAAQ,CAAC,KAAK,CAAC;YAAE,OAAO,KAAK,CAAC,IAAI,CAAC,IAAI,EAAE,CAAC,CAAC;QAC/C,IAAI,KAAK,CAAC,QAAQ,KAAK,SAAS,EAAE,CAAC;YACjC,MAAM,OAAO,GAAG,MAAM,UAAU,CAAC,KAAK,CAAC,QAAQ,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC,CAAC,SAAS,EAAE,KAAK,CAAC,CAAC;YAClF,IAAI,OAAO;gBAAE,OAAO,KAAK,CAAC,OAAO,CAAC,CAAC;QACrC,CAAC;QACD,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI;YAAE,OAAO,UAAI,CAAC;QACnC,MAAM,IAAI,GAAW,EAAE,CAAC;QACxB,KAAK,MAAM,CAAC,IAAI,EAAE,EAAE,MAAM,EAAE,KAAK,EAAE,CAAC,IAAI,KAAK,CAAC,KAAK;YAAE,IAAI,IAAA,kBAAS,EAAC,IAAI,CAAC,MAAM,EAAE,CAAC,IAAI,CAAC,EAAE,KAAK,CAAC;gBAAE,IAAI,CAAC,IAAI,CAAC,GAAG,MAAM,CAAC;QACpH,IAAI,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,MAAM;YAAE,IAAI,CAAC,KAAK,CAAC,IAAI,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QAC5D,OAAO,KAAK,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAC,MAAM,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;IAClE,CAAC;IAAC,OAAO,KAAK,EAAE,CAAC;QACf,OAAO,KAAK,CAAC,EAAE,MAAM,EAAE,QAAQ,EAAE,OAAO,EAAE,OAAO,CAAC,KAAK,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC;IACrE,CAAC;AACH,CAAC;AAYD;;;;;;GAMG;AACH,SAAgB,SAAS,CAAC,KAAgB,EAAE,OAAqB;IAC/D,MAAM,EAAE,GAAG,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,MAAM,EAAE,MAAM,EAAE,GAAG,OAAO,CAAC;IAC9D,MAAM,EAAE,QAAQ,EAAE,GAAG,KAAK,CAAC;IAC3B,MAAM,IAAI,GAAG,GAAG,CAAC,IAAI,CAAC,IAAI,CAAC;IAC3B,MAAM,IAAI,GAAG,SAAS,CAAC,KAAK,EAAE,GAAG,CAAC,IAAI,CAAC,MAAM,EAAE,EAAE,KAAK,CAAC,MAAM,EAAE,CAAC,GAAG,CAAC,IAAI,CAAC,OAAO,EAAE,CAAC,CAAC;IACpF,MAAM,MAAM,GAAG,KAAK,CAAC,MAAM,IAAI,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC,MAAM,CAAC,KAAK,IAAI,EAAE,EAAE,SAAS,IAAI,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,EAAE,MAAM,CAAC,OAAO,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACzI,MAAM,GAAG,GAAG,KAAK,CAAC,GAAG,CAAC,MAAM,GAAG,CAAC,IAAI,KAAK,CAAC,QAAQ,KAAK,SAAS,IAAI,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,CAAC,CAAC;IACxF,MAAM,GAAG,GAAG,MAAM,CAAC,IAAI,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,IAAI,CAAC,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,GAAG,IAAI,MAAM,KAAK,SAAS,CAAC,CAAC,CAAC,KAAK,CAAC,GAAG,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC;IAC7H,MAAM,IAAI,GAAG,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC;IAC7B,MAAM,OAAO,GAAG,SAAS,IAAI,MAAM,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC,SAAS,CAAC;IACjE,MAAM,KAAK,GAAG,OAAO,KAAK,SAAS,CAAC,CAAC,CAAC,QAAQ,CAAC,aAAa,CAAC,CAAC,CAAC,OAAO,KAAK,WAAW,CAAC,CAAC,CAAC,QAAQ,CAAC,eAAe,CAAC,CAAC,CAAC,IAAA,sBAAW,EAAC,QAAQ,EAAE,QAAQ,CAAC,SAAS,EAAE,EAAE,KAAK,EAAE,MAAM,CAAC,KAAK,IAAI,EAAE,EAAE,CAAC,CAAC;IAC7L,MAAM,IAAI,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,SAAkB,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;IACvF,KAAK,MAAM,KAAK,IAAI,IAAI;QAAE,IAAI,EAAE,GAAG,CAAC,KAAK,CAAC,OAAO,EAAE,KAAK,CAAC,IAAI,CAAC,CAAC;IAC/D,IAAI,CAAC,IAAI;QAAE,OAAO;IAClB,MAAM,EAAE,GAAG,GAAG,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC;IACjC,MAAM,EAAE,GAAG,GAAG,KAAK,CAAC,EAAE,OAAO,CAAC;IAC9B,IAAI,EAAE,GAAG,CAAC,IAAI,CAAC,OAAO,EAAE,IAAI,CAAC,IAAI,EAAE;QACjC,IAAI,EAAE,GAAG,EAAE,CACT,KAAK,CAAC,KAAK,CACT,CAAC,KAAK,IAAwB,EAAE;YAC9B,MAAM,KAAK,GAAa,EAAE,EAAE,EAAE,KAAK,EAAE,EAAE,EAAE,KAAK,EAAE,OAAO,EAAE,UAAU,EAAE,EAAE,EAAE,GAAG,CAAC,KAAK,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,GAAG,KAAK,CAAC,SAAS,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC;YAC3I,MAAM,KAAK,GAAG,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC;YAClD,6EAA6E;YAC7E,MAAM,KAAK,GAAc,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,KAAK,GAAG,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,QAAQ,CAAC,MAAM,EAAE,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,KAAK,CAAC,QAAQ,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,MAAM,QAAQ,CAAC,GAAG,EAAE,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,KAAK,CAAC,GAAG,EAAE,KAAK,EAAE,IAAI,GAAG,EAAE,EAAE,EAAE,KAAK,CAAC,CAAC;YACvP,KAAK,CAAC,IAAI,CAAC,KAAK,EAAE,EAAE,EAAE,EAAE,KAAK,EAAE,MAAM,EAAE,KAAK,EAAE,CAAC,CAAC;YAChD,OAAO,KAAK,CAAC;QACf,CAAC,CAAC,EAAE,CACL;KACJ,CAAC,CAAC;AACL,CAAC"}

package/src/lib/record/press-undo.mjs

@@ -0,0 +1,110 @@
+import { fillMessage } from './messages.mjs';
+import { DONE } from './run.mjs';
+import { sameValue, structuredCopy } from './values.mjs';
+const wordsOf = (error) => (error instanceof Error ? error.message : String(error));
+/** The steps a press does that Fieldia cannot take back by itself: a copy, a delete, a form put back or closed, a page opened, an address, a post. */
+const BEYOND = /"do":"(duplicate|delete|reset|close|open|openUrl|post)"/;
+/**
+ * What a press did, read as it ends against the values it began with (`PressTaken.at`): each field it changed — a
+ * value worked out aside, which follows — and whether it saved them (the record holds no change left to save).
+ */
+export function pressDone(taken, now, fields, saved) {
+    const wrote = new Map();
+    for (const name of new Set([...Object.keys(taken.at), ...Object.keys(now)])) {
+        if (fields[name]?.compute || sameValue(taken.at[name], now[name]))
+            continue;
+        wrote.set(name, { before: (taken.at[name] ?? null), after: structuredCopy(now[name] ?? null) });
+    }
+    return { app: taken.app, ...(taken.archived !== undefined ? { archived: taken.archived } : {}), wrote, ...(wrote.size && saved ? { saved } : {}) };
+}
+/**
+ * Take back what a press did (`PressTaken`), as its toast's Undo asks: the app's own undos, latest first, each
+ * answered as a call is; the record it archived brought back, or the reverse; then the values its steps and the
+ * app's answers wrote put back — each only while it holds what they left, a change made since by anyone else staying
+ * — and saved again where the press saved. On the record the press was on: another shown since, nothing is done.
+ */
+export async function takeBack(kit, taken, scope) {
+    const { form, answered, recordStep, replaced, tell } = kit;
+    scope.generation ??= form.generation();
+    const ended = (stopped) => stopped ? { done: false, reason: stopped.reason, ...(stopped.message !== undefined ? { message: stopped.message } : {}), ...(stopped.error !== undefined ? { error: stopped.error } : {}) } : DONE;
+    try {
+        // The app's own, whatever record is shown now: what it answers is laid only on the one the press ended on.
+        for (const undo of [...taken.app].reverse()) {
+            let answer;
+            try {
+                answer = await undo();
+            }
+            catch (error) {
+                return ended({ reason: 'app', message: wordsOf(error), error });
+            }
+            if (!answer)
+                continue;
+            if (replaced(scope)) {
+                if (answer.say !== undefined)
+                    tell(null, typeof answer.say === 'string' ? answer.say : answer.say.message, (typeof answer.say === 'object' && answer.say.tone) || 'info');
+                continue;
+            }
+            const stopped = await answered(answer, scope);
+            if (stopped)
+                return ended(stopped);
+        }
+        if (taken.archived === undefined && !taken.wrote.size)
+            return DONE;
+        if (replaced(scope))
+            return ended(form.gone());
+        if (taken.archived !== undefined) {
+            const stopped = await recordStep(taken.archived ? 'unarchive' : 'archive', scope);
+            if (stopped)
+                return ended(stopped);
+        }
+        if (!taken.wrote.size)
+            return DONE;
+        const back = {};
+        for (const [name, { before, after }] of taken.wrote)
+            if (sameValue(form.values()[name], after))
+                back[name] = before;
+        if (Object.keys(back).length)
+            form.write(back, scope.chain);
+        return ended(taken.saved ? await form.save(scope.chain) : null);
+    }
+    catch (error) {
+        return ended({ reason: 'cannot', message: wordsOf(error), error });
+    }
+}
+/**
+ * A press that offers Undo has ended: the words it held are said — the last, once it ran whole, with Undo, where what
+ * it did can be taken back (its button's steps for it; else Fieldia's own taking back, where nothing it did is beyond
+ * it — a copy, a delete, a page opened, a post, the app's call answered with no undo; else the app's own undos) — or,
+ * with nothing said, "Done: {label}". Undo runs on the record the press ended on: another shown since, only the app's
+ * own undos run.
+ */
+export function offerUndo(inner, context) {
+    const { kit, source, scope, taken, result, offers } = context;
+    const { messages } = inner;
+    const host = kit.form.host;
+    const done = pressDone(taken, kit.form.values(), inner.fields, !kit.form.changed());
+    const beyond = taken.beyond ?? BEYOND.exec(JSON.stringify([source.steps ?? [], 'builtin' in source ? { do: source.builtin } : {}]))?.[1];
+    const did = taken.app.length > 0 || taken.archived !== undefined || done.wrote.size > 0;
+    const can = result.done && (Array.isArray(offers) || (offers === true ? did && beyond === undefined : taken.app.length > 0));
+    const said = [...taken.said];
+    const builtin = 'builtin' in source ? source.builtin : undefined;
+    const plain = builtin === 'archive' ? messages.pressArchived : builtin === 'unarchive' ? messages.pressUnarchived : fillMessage(messages, messages.pressDone, { label: source.label ?? '' });
+    const last = can ? (said.pop() ?? { message: plain, tone: 'success' }) : null;
+    for (const words of said)
+        host?.say(words.message, words.tone);
+    if (!last)
+        return;
+    const on = kit.form.generation();
+    const id = `${scope.id}.undo`;
+    host?.say(last.message, last.tone, {
+        undo: () => inner.track((async () => {
+            const again = { id, chain: [], typed: 'first', generation: on, ...(scope.recordIds ? { recordIds: [...scope.recordIds] } : {}) };
+            const steps = Array.isArray(offers) ? offers : [];
+            // Its steps, on the record the press ended on; else what it did, taken back.
+            const ended = Array.isArray(offers) ? (on === kit.form.generation() ? await kit.runSteps(offers, again) : { done: false, ...inner.replaced() }) : await takeBack(kit, offers === true ? done : { app: taken.app, wrote: new Map() }, again);
+            inner.emit('run', { id, steps, result: ended });
+            return ended;
+        })()),
+    });
+}
+//# sourceMappingURL=press-undo.mjs.map

package/src/lib/record/press-undo.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"press-undo.mjs","sourceRoot":"","sources":["../../../../../../libs/core/src/lib/record/press-undo.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,WAAW,EAAE,MAAM,YAAY,CAAC;AACzC,OAAO,EAAE,IAAI,EAAiG,MAAM,OAAO,CAAC;AAG5H,OAAO,EAAE,SAAS,EAAE,cAAc,EAA2B,MAAM,UAAU,CAAC;AAE9E,MAAM,OAAO,GAAG,CAAC,KAAc,EAAE,EAAE,CAAC,CAAC,KAAK,YAAY,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC;AAQ7F,sJAAsJ;AACtJ,MAAM,MAAM,GAAG,yDAAyD,CAAC;AAEzE;;;GAGG;AACH,MAAM,UAAU,SAAS,CAAC,KAAiB,EAAE,GAAW,EAAE,MAAc,EAAE,KAAc;IACtF,MAAM,KAAK,GAAG,IAAI,GAAG,EAA2C,CAAC;IACjE,KAAK,MAAM,IAAI,IAAI,IAAI,GAAG,CAAC,CAAC,GAAG,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,EAAE,CAAC,EAAE,GAAG,MAAM,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC;QAC5E,IAAI,MAAM,CAAC,IAAI,CAAC,EAAE,OAAO,IAAI,SAAS,CAAC,KAAK,CAAC,EAAE,CAAC,IAAI,CAAC,EAAE,GAAG,CAAC,IAAI,CAAC,CAAC;YAAE,SAAS;QAC5E,KAAK,CAAC,GAAG,CAAC,IAAI,EAAE,EAAE,MAAM,EAAE,CAAC,KAAK,CAAC,EAAE,CAAC,IAAI,CAAC,IAAI,IAAI,CAAU,EAAE,KAAK,EAAE,cAAc,CAAC,GAAG,CAAC,IAAI,CAAC,IAAI,IAAI,CAAU,EAAE,CAAC,CAAC;IACpH,CAAC;IACD,OAAO,EAAE,GAAG,EAAE,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,KAAK,CAAC,QAAQ,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,QAAQ,EAAE,KAAK,CAAC,QAAQ,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,KAAK,EAAE,GAAG,CAAC,KAAK,CAAC,IAAI,IAAI,KAAK,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC;AACrJ,CAAC;AAED;;;;;GAKG;AACH,MAAM,CAAC,KAAK,UAAU,QAAQ,CAAC,GAAY,EAAE,KAAgB,EAAE,KAAe;IAC9E,MAAM,EAAE,IAAI,EAAE,QAAQ,EAAE,UAAU,EAAE,QAAQ,EAAE,IAAI,EAAE,GAAG,GAAG,CAAC;IACzD,KAAK,CAAC,UAAU,KAAK,IAAI,CAAC,UAAU,EAAE,CAAC;IACvC,MAAM,KAAK,GAAG,CAAC,OAAuB,EAAa,EAAE,CACnD,OAAO,CAAC,CAAC,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,MAAM,EAAE,OAAO,CAAC,MAAM,EAAE,GAAG,CAAC,OAAO,CAAC,OAAO,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,OAAO,EAAE,OAAO,CAAC,OAAO,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,GAAG,CAAC,OAAO,CAAC,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,EAAE,KAAK,EAAE,OAAO,CAAC,KAAK,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC;IACrM,IAAI,CAAC;QACH,2GAA2G;QAC3G,KAAK,MAAM,IAAI,IAAI,CAAC,GAAG,KAAK,CAAC,GAAG,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC;YAC5C,IAAI,MAA2B,CAAC;YAChC,IAAI,CAAC;gBACH,MAAM,GAAG,MAAM,IAAI,EAAE,CAAC;YACxB,CAAC;YAAC,OAAO,KAAK,EAAE,CAAC;gBACf,OAAO,KAAK,CAAC,EAAE,MAAM,EAAE,KAAK,EAAE,OAAO,EAAE,OAAO,CAAC,KAAK,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC;YAClE,CAAC;YACD,IAAI,CAAC,MAAM;gBAAE,SAAS;YACtB,IAAI,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC;gBACpB,IAAI,MAAM,CAAC,GAAG,KAAK,SAAS;oBAAE,IAAI,CAAC,IAAI,EAAE,OAAO,MAAM,CAAC,GAAG,KAAK,QAAQ,CAAC,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,OAAO,EAAE,CAAC,OAAO,MAAM,CAAC,GAAG,KAAK,QAAQ,IAAI,MAAM,CAAC,GAAG,CAAC,IAAI,CAAC,IAAI,MAAM,CAAC,CAAC;gBAC1K,SAAS;YACX,CAAC;YACD,MAAM,OAAO,GAAG,MAAM,QAAQ,CAAC,MAAM,EAAE,KAAK,CAAC,CAAC;YAC9C,IAAI,OAAO;gBAAE,OAAO,KAAK,CAAC,OAAO,CAAC,CAAC;QACrC,CAAC;QACD,IAAI,KAAK,CAAC,QAAQ,KAAK,SAAS,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI;YAAE,OAAO,IAAI,CAAC;QACnE,IAAI,QAAQ,CAAC,KAAK,CAAC;YAAE,OAAO,KAAK,CAAC,IAAI,CAAC,IAAI,EAAE,CAAC,CAAC;QAC/C,IAAI,KAAK,CAAC,QAAQ,KAAK,SAAS,EAAE,CAAC;YACjC,MAAM,OAAO,GAAG,MAAM,UAAU,CAAC,KAAK,CAAC,QAAQ,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC,CAAC,SAAS,EAAE,KAAK,CAAC,CAAC;YAClF,IAAI,OAAO;gBAAE,OAAO,KAAK,CAAC,OAAO,CAAC,CAAC;QACrC,CAAC;QACD,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI;YAAE,OAAO,IAAI,CAAC;QACnC,MAAM,IAAI,GAAW,EAAE,CAAC;QACxB,KAAK,MAAM,CAAC,IAAI,EAAE,EAAE,MAAM,EAAE,KAAK,EAAE,CAAC,IAAI,KAAK,CAAC,KAAK;YAAE,IAAI,SAAS,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,IAAI,CAAC,EAAE,KAAK,CAAC;gBAAE,IAAI,CAAC,IAAI,CAAC,GAAG,MAAM,CAAC;QACpH,IAAI,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,MAAM;YAAE,IAAI,CAAC,KAAK,CAAC,IAAI,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QAC5D,OAAO,KAAK,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAC,MAAM,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;IAClE,CAAC;IAAC,OAAO,KAAK,EAAE,CAAC;QACf,OAAO,KAAK,CAAC,EAAE,MAAM,EAAE,QAAQ,EAAE,OAAO,EAAE,OAAO,CAAC,KAAK,CAAC,EAAE,KAAK,EAAE,CAAC,CAAC;IACrE,CAAC;AACH,CAAC;AAYD;;;;;;GAMG;AACH,MAAM,UAAU,SAAS,CAAC,KAAgB,EAAE,OAAqB;IAC/D,MAAM,EAAE,GAAG,EAAE,MAAM,EAAE,KAAK,EAAE,KAAK,EAAE,MAAM,EAAE,MAAM,EAAE,GAAG,OAAO,CAAC;IAC9D,MAAM,EAAE,QAAQ,EAAE,GAAG,KAAK,CAAC;IAC3B,MAAM,IAAI,GAAG,GAAG,CAAC,IAAI,CAAC,IAAI,CAAC;IAC3B,MAAM,IAAI,GAAG,SAAS,CAAC,KAAK,EAAE,GAAG,CAAC,IAAI,CAAC,MAAM,EAAE,EAAE,KAAK,CAAC,MAAM,EAAE,CAAC,GAAG,CAAC,IAAI,CAAC,OAAO,EAAE,CAAC,CAAC;IACpF,MAAM,MAAM,GAAG,KAAK,CAAC,MAAM,IAAI,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC,MAAM,CAAC,KAAK,IAAI,EAAE,EAAE,SAAS,IAAI,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,EAAE,MAAM,CAAC,OAAO,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACzI,MAAM,GAAG,GAAG,KAAK,CAAC,GAAG,CAAC,MAAM,GAAG,CAAC,IAAI,KAAK,CAAC,QAAQ,KAAK,SAAS,IAAI,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,CAAC,CAAC;IACxF,MAAM,GAAG,GAAG,MAAM,CAAC,IAAI,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,IAAI,CAAC,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,GAAG,IAAI,MAAM,KAAK,SAAS,CAAC,CAAC,CAAC,KAAK,CAAC,GAAG,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC;IAC7H,MAAM,IAAI,GAAG,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,CAAC;IAC7B,MAAM,OAAO,GAAG,SAAS,IAAI,MAAM,CAAC,CAAC,CAAC,MAAM,CAAC,OAAO,CAAC,CAAC,CAAC,SAAS,CAAC;IACjE,MAAM,KAAK,GAAG,OAAO,KAAK,SAAS,CAAC,CAAC,CAAC,QAAQ,CAAC,aAAa,CAAC,CAAC,CAAC,OAAO,KAAK,WAAW,CAAC,CAAC,CAAC,QAAQ,CAAC,eAAe,CAAC,CAAC,CAAC,WAAW,CAAC,QAAQ,EAAE,QAAQ,CAAC,SAAS,EAAE,EAAE,KAAK,EAAE,MAAM,CAAC,KAAK,IAAI,EAAE,EAAE,CAAC,CAAC;IAC7L,MAAM,IAAI,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,SAAkB,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC;IACvF,KAAK,MAAM,KAAK,IAAI,IAAI;QAAE,IAAI,EAAE,GAAG,CAAC,KAAK,CAAC,OAAO,EAAE,KAAK,CAAC,IAAI,CAAC,CAAC;IAC/D,IAAI,CAAC,IAAI;QAAE,OAAO;IAClB,MAAM,EAAE,GAAG,GAAG,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC;IACjC,MAAM,EAAE,GAAG,GAAG,KAAK,CAAC,EAAE,OAAO,CAAC;IAC9B,IAAI,EAAE,GAAG,CAAC,IAAI,CAAC,OAAO,EAAE,IAAI,CAAC,IAAI,EAAE;QACjC,IAAI,EAAE,GAAG,EAAE,CACT,KAAK,CAAC,KAAK,CACT,CAAC,KAAK,IAAwB,EAAE;YAC9B,MAAM,KAAK,GAAa,EAAE,EAAE,EAAE,KAAK,EAAE,EAAE,EAAE,KAAK,EAAE,OAAO,EAAE,UAAU,EAAE,EAAE,EAAE,GAAG,CAAC,KAAK,CAAC,SAAS,CAAC,CAAC,CAAC,EAAE,SAAS,EAAE,CAAC,GAAG,KAAK,CAAC,SAAS,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC;YAC3I,MAAM,KAAK,GAAG,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC;YAClD,6EAA6E;YAC7E,MAAM,KAAK,GAAc,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,KAAK,GAAG,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,QAAQ,CAAC,MAAM,EAAE,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,KAAK,CAAC,QAAQ,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,MAAM,QAAQ,CAAC,GAAG,EAAE,MAAM,KAAK,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,KAAK,CAAC,GAAG,EAAE,KAAK,EAAE,IAAI,GAAG,EAAE,EAAE,EAAE,KAAK,CAAC,CAAC;YACvP,KAAK,CAAC,IAAI,CAAC,KAAK,EAAE,EAAE,EAAE,EAAE,KAAK,EAAE,MAAM,EAAE,KAAK,EAAE,CAAC,CAAC;YAChD,OAAO,KAAK,CAAC;QACf,CAAC,CAAC,EAAE,CACL;KACJ,CAAC,CAAC;AACL,CAAC"}

package/src/lib/record/quiz.d.mts

@@ -0,0 +1,36 @@
+import type { Page } from '../format/page.mjs';
+import type { Value, Values } from './values.mjs';
+/**
+ * A quiz's results (`quiz` on a page): each question asked marked — right or wrong where it has right answers, its
+ * points of its most — and the score of them all. The form works them out as the answers are sent (`state.sent.quiz`),
+ * unless the app's source answered the send with its own (`SubmitResult.quiz`): a test that keeps its right answers out
+ * of the page marks them on its server.
+ */
+export interface QuizResults {
+    /** The points earned, of the most the questions asked could earn. */
+    score: number;
+    max: number;
+    /** Each question asked that earns points or has right answers, in the order it was asked. */
+    questions: QuizMark[];
+}
+/** One question's mark. */
+export interface QuizMark {
+    field: string;
+    /** Its points, of its most. */
+    points: number;
+    max: number;
+    /** Right or wrong where the question has right answers; null for one of points alone (its options' `score`). */
+    right: boolean | null;
+    /** Whether it was answered at all. */
+    answered: boolean;
+    /** The right answer, as a value of the field (a list of them for several), where the page shows it: for one answered wrongly or not at all. */
+    rightAnswer?: Value;
+    /** The question's own words for its answer: its feedback when right, or when wrong. */
+    feedback?: string;
+}
+/**
+ * A quiz's results for the answers sent, in the order the questions were asked (`asked`, the fields whose answers were
+ * sent: a question not shown, its step skipped, is none). Null where no question asked earns points or has right
+ * answers.
+ */
+export declare function quizResults(page: Page, values: Values, asked?: readonly string[]): QuizResults | null;

package/src/lib/record/quiz.d.ts

@@ -0,0 +1,36 @@
+import type { Page } from '../format/page';
+import type { Value, Values } from './values';
+/**
+ * A quiz's results (`quiz` on a page): each question asked marked — right or wrong where it has right answers, its
+ * points of its most — and the score of them all. The form works them out as the answers are sent (`state.sent.quiz`),
+ * unless the app's source answered the send with its own (`SubmitResult.quiz`): a test that keeps its right answers out
+ * of the page marks them on its server.
+ */
+export interface QuizResults {
+    /** The points earned, of the most the questions asked could earn. */
+    score: number;
+    max: number;
+    /** Each question asked that earns points or has right answers, in the order it was asked. */
+    questions: QuizMark[];
+}
+/** One question's mark. */
+export interface QuizMark {
+    field: string;
+    /** Its points, of its most. */
+    points: number;
+    max: number;
+    /** Right or wrong where the question has right answers; null for one of points alone (its options' `score`). */
+    right: boolean | null;
+    /** Whether it was answered at all. */
+    answered: boolean;
+    /** The right answer, as a value of the field (a list of them for several), where the page shows it: for one answered wrongly or not at all. */
+    rightAnswer?: Value;
+    /** The question's own words for its answer: its feedback when right, or when wrong. */
+    feedback?: string;
+}
+/**
+ * A quiz's results for the answers sent, in the order the questions were asked (`asked`, the fields whose answers were
+ * sent: a question not shown, its step skipped, is none). Null where no question asked earns points or has right
+ * answers.
+ */
+export declare function quizResults(page: Page, values: Values, asked?: readonly string[]): QuizResults | null;