@letterstory/cli 0.42.0 → 0.44.0

package/lib/cli.mjs

@@ -52,7 +52,7 @@ import {
 } from "./commands.mjs";
 
 // Keep in sync with cli/package.json.
-export const VERSION = "0.42.0";
+export const VERSION = "0.44.0";
 
 // Flags that never take a value. Listing them explicitly means `deploy get --json <id>`
 // can't accidentally swallow the id as --json's value.
@@ -561,10 +561,19 @@ Admin (STAFF key — --staff-key / LETTERSTORY_STAFF_API_KEY; acts before an org
                    [--name …] [--email …] [--company …] [--domain …] [--linkedin …] [--detail …]
           | signal <id> qualify|dismiss|link [--account <id>]
           | accounts [--stage lead] [--q acme] | account <id> | score <account-id>
+          | slack-channels [--all] | link-slack <account-id> <channel-id|none>
+          | white-glove [--suggested] | set-white-glove <account-id> on|off [--note "…"]
+          | churn [--months 12] | record-churn <account-id> <reason> [--note "…"] [--at ISO]
+            [--mrr-cents N] | undo-churn <account-id>
                                                        The staff CRM's pipeline: the inbound signal
                                                        feed, recording a signal with no webhook
                                                        (Bookface, a tweet like), qualifying or
                                                        dismissing one, and the explained score.
+                                                       White glove is a person's decision: the
+                                                       desk only suggests ($1K+/mo post-sales).
+                                                       Churn: 30/90-day logo + revenue rates, who
+                                                       churned and why; Stripe cancellations are
+                                                       only suggestions until a person records one.
                                                        Needs crm:read (reads) / crm:write (writes).
   admin tuning-context [--q "<question>"]              The experiment agent's context pack (JSON):
                                                        the pipeline as deployed, levers, measures,

package/lib/commands/admin.mjs

@@ -7,7 +7,7 @@
 //   admin experiments list|show|new|update|note|started|spend|conclude|abandon …   (tuning:experiment)
 //   admin tuning-context [--q "<question>"]                                         (tuning:experiment)
 //   admin tuning-import <brief-results.json> [--experiment <id>]                    (tuning:experiment)
-//   admin crm signals|record|signal|accounts|account|score|slack-channels|link-slack …  (crm:read / crm:write)
+//   admin crm signals|record|signal|accounts|account|score|slack-channels|link-slack|white-glove|set-white-glove|churn|record-churn|undo-churn …  (crm:read / crm:write)
 //   admin create-org --domain acme.com [--name "Acme"] [--test] [--no-key] [--key-name N]
 //                    [--capabilities a,b] [--onboard] [--about "…"] [--sitemap <url>]
 //                    [--cms <provider>] [--posts N] [--seers suggest|skip] [--no-visuals]
@@ -530,9 +530,102 @@ async function cmdAdminCrm(ctx) {
 			});
 			return out(r, () => (action === "none" ? "unlinked" : `linked ${action}`));
 		}
+		case "white-glove": {
+			// admin crm white-glove [--suggested] — the white-glove accounts, or the desk's suggestions.
+			const r = await staffRequest(ctx, "GET", `${CRM}/white-glove`);
+			if (flagBool(flags.suggested)) {
+				return out(r, (x) =>
+					x.suggested.length
+						? x.suggested.map((s) => `${accountLine(s.account)}\n    ${s.reason}`).join("\n")
+						: "(no suggestions)"
+				);
+			}
+			return out(r, (x) =>
+				x.accounts.length
+					? x.accounts
+							.map(
+								(a) =>
+									`${accountLine(a)}${a.whiteGloveAt ? `\n    since ${a.whiteGloveAt.slice(0, 10)}` : ""}${a.whiteGloveNote ? ` · ${a.whiteGloveNote}` : ""}`
+							)
+							.join("\n")
+					: "(no white-glove accounts)"
+			);
+		}
+		case "set-white-glove": {
+			// admin crm set-white-glove <account-id> on|off [--note "SLA 1h, weekly check-in"]
+			if (!id || !["on", "off"].includes(action)) {
+				throw new CliError(
+					'Usage: admin crm set-white-glove <account-id> on|off [--note "SLA 1h, weekly check-in"]'
+				);
+			}
+			const note = flagStr(flags.note);
+			const r = await staffRequest(
+				ctx,
+				"PATCH",
+				`${CRM}/accounts/${id}`,
+				compact({ white_glove: action === "on", white_glove_note: note })
+			);
+			return out(r, () => (action === "on" ? "moved to white glove" : "left white glove"));
+		}
+		case "churn": {
+			// admin crm churn [--months 12] — the 30/90-day rates, who churned and why, likely churns.
+			const params = new URLSearchParams(compact({ months: flagStr(flags.months) }));
+			const pct = (x) => (x == null ? "—" : `${(x * 100).toFixed(1)}%`);
+			const usd = (cents) => `$${Math.round(cents / 100).toLocaleString("en-US")}`;
+			const win = (label, w) =>
+				`${label}: ${w.churned}/${w.customersAtStart} customers (${pct(w.rate)}) · ${usd(w.mrrLostCents)}/mo lost (${pct(w.revenueRate)} of MRR)`;
+			return out(await staffRequest(ctx, "GET", `${CRM}/churn?${params}`), (r) =>
+				[
+					win("30d", r.window.days30),
+					win("90d", r.window.days90),
+					"",
+					"Churned:",
+					...(r.churned.length
+						? r.churned.map(
+								(c) =>
+									`  ${c.churnedAt.slice(0, 10)}${c.churnedAtSource === "undated" ? "?" : ""}  ${c.account.name}  ${c.reason ?? "unrecorded"}  ${usd(c.mrrLostCents)}/mo${c.note ? `  — ${c.note}` : ""}`
+							)
+						: ["  (none)"]),
+					"",
+					"Likely churned (not recorded):",
+					...(r.likely.length
+						? r.likely.map((l) => `  ${accountLine(l.account)}\n    ${l.signal}`)
+						: ["  (none)"]),
+				].join("\n")
+			);
+		}
+		case "record-churn": {
+			// admin crm record-churn <account-id> <reason> [--note "…"] [--at ISO] [--mrr-cents N]
+			if (!id || !action) {
+				throw new CliError(
+					'Usage: admin crm record-churn <account-id> <price|no_results|competitor|in_house|shut_down|budget|bad_fit|service|other> [--note "…"] [--at 2026-09-22T00:00:00Z] [--mrr-cents 50000]'
+				);
+			}
+			const r = await staffPost(
+				ctx,
+				`${CRM}/accounts/${id}/churn`,
+				compact({
+					reason: action,
+					note: flagStr(flags.note),
+					churned_at: flagStr(flags.at),
+					mrr_cents: flagNum(flags["mrr-cents"]),
+				})
+			);
+			return out(
+				r,
+				(x) =>
+					`${x.change === "updated" ? "churn updated" : "churn recorded"}: ${accountLine(x.account)} · ${x.account.churnMrrCents == null ? "no MRR on file" : `$${Math.round(x.account.churnMrrCents / 100)}/mo lost`}`
+			);
+		}
+		case "undo-churn": {
+			// admin crm undo-churn <account-id> — clear the churn and move back to active.
+			if (!id) throw new CliError("Usage: admin crm undo-churn <account-id>");
+			const r = await staffRequest(ctx, "DELETE", `${CRM}/accounts/${id}/churn`);
+			return out(r, (x) => `churn undone: ${accountLine(x.account)}`);
+		}
 		default:
 			throw new CliError(
-				"Usage: admin crm signals|record|signal|accounts|account|score|slack-channels|link-slack … (see --help)"
+				"Usage: admin crm signals|record|signal|accounts|account|score|slack-channels|link-slack|white-glove|set-white-glove|churn|record-churn|undo-churn … (see --help)"
 			);
 	}
 }

package/package.json

@@ -1,6 +1,6 @@
 {
 	"name": "@letterstory/cli",
-	"version": "0.42.0",
+	"version": "0.44.0",
 	"description": "Spin up and manage Letterstory phantom blogs from your terminal.",
 	"type": "module",
 	"license": "UNLICENSED",