@thebattlearena/corner 0.10.1-beta.81 → 0.10.1-beta.82

package/README.md

@@ -439,7 +439,7 @@ accept|reject --why "<lo que dijo el humano>"`.
 
 **Revisión humana por bloques (PR Review Lab)**: cada punto del plan técnico es un bloque (`B<n>` es
 el punto n). `judges-card.mjs plan <pr> estimate <n> --minutes <m> [--priority 1-4]` le pone estimado y
-prioridad. Al pasar a «en curso» se anotan el inicio y el autor (el `user.email` de git del worktree),
+prioridad (sin ellos un bloque no arranca; también van en el mismo comando: `plan <pr> <n> "en curso" --minutes <m> --priority <p>`). Al pasar a «en curso» se anotan el inicio y el autor (el `user.email` de git del worktree),
 y al pasar a «espera al juez» el fin y el rango (`--range A..B` lo fija a mano); todo va en
 `plan.jsonl`, que es lo que lee el modo «Pelea del ring» de PR Review Lab. Cuando `humanReviewEvery`
 bloques (2 por default, `null` lo apaga) esperan al juez, suena la campana en PR Review Lab y

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@thebattlearena/corner",
-  "version": "0.10.1-beta.81",
+  "version": "0.10.1-beta.82",
   "description": "Corner: tu esquina de Battle Arena en Claude Code (el plugin `battlearena`). Hooks de tracking, objetivo del turno, plan de batalla /battlearena:conquer, Ringside (el panel de tu día), el ring y la radio. Zero-dependency.",
   "type": "module",
   "bin": {

package/ring/scripts/judges-card.mjs

@@ -610,10 +610,25 @@ function plan([pr, target, ...rest]) {
   const [state] = rest;
   if (!target || !state)
     throw new Error(
-      'usage: plan <pr> <n|title> <pendiente|espera al juez|en curso|hecho> [--ref <sha|round-bell>] [--range A..B] | estimate <n> --minutes <m> [--priority 1-4] | add … | list',
+      'usage: plan <pr> <n|title> <pendiente|espera al juez|en curso|hecho> [--ref <sha|round-bell>] [--range A..B] [--minutes <m> --priority <1-4>] | estimate <n> --minutes <m> [--priority 1-4] | add … | list',
     );
+  const { config } = loadConfig(projectDir(), {
+    contract: false,
+    venue: readState(dir).venue ?? DEFAULT_VENUE,
+  });
+  const inline = [value('--minutes'), value('--priority')].some(
+    (given) => given != null,
+  );
   const changed = setPlanState(dir, target, state, value('--ref'), undefined, {
     range: value('--range'),
+    estimate: inline
+      ? estimateFacts({
+          priority: value('--priority'),
+          minutes: value('--minutes'),
+        })
+      : null,
+    // Under the human review by blocks a block starts with its estimate and priority.
+    requireEstimate: Boolean(config.humanReviewEvery),
   });
   console.log(
     `${changed.n}. ${changed.title}: ${changed.from} → ${changed.to} at ${localStamp(new Date())}${changed.facts.range && changed.to === 'espera al juez' ? ` · range ${changed.facts.range}` : ''}`,

package/ring/scripts/review-blocks.mjs

@@ -70,6 +70,21 @@ export function factsForState(previous, to, { at, head, email, range }) {
   return {};
 }
 
+/**
+ * Why a block may not start: under the human review by blocks, a block enters «en curso» only with
+ * its estimate and priority (PR Review Lab orders by one and calibrates the other against the real
+ * time per person). Null when it may. PURE.
+ */
+export function startRefusal(facts, to, n) {
+  if (to !== 'en curso') return null;
+  const missing = [
+    facts.estimateMin == null && '--minutes <m>',
+    facts.priority == null && '--priority <1-4>',
+  ].filter(Boolean);
+  if (!missing.length) return null;
+  return `B${n} has no ${facts.estimateMin == null ? 'estimate' : 'priority'} yet: a block starts with its estimate and priority (the human review by blocks). Add ${missing.join(' ')} to this command, or run plan <pr> estimate ${n} ${missing.join(' ')} first`;
+}
+
 /** Checks an estimate: priority 1–4 and whole minutes. PURE. */
 export function estimateFacts({ priority, minutes }) {
   const facts = {};

package/ring/scripts/tech-plan-log.mjs

@@ -12,7 +12,12 @@ import { join } from 'node:path';
 
 import { readState } from './config.mjs';
 import { scriptJson } from './contract-endpoints.mjs';
-import { authorEmail, blockFacts, factsForState } from './review-blocks.mjs';
+import {
+  authorEmail,
+  blockFacts,
+  factsForState,
+  startRefusal,
+} from './review-blocks.mjs';
 import {
   parsePlan,
   parsePlanLog,
@@ -34,7 +39,7 @@ export function setPlanState(
   state,
   ref = null,
   at = new Date().toISOString(),
-  { range = null, estimate = null } = {},
+  { range = null, estimate = null, requireEstimate = false } = {},
 ) {
   const file = join(dir, PLAN);
   const markdown = read(file);
@@ -58,6 +63,11 @@ export function setPlanState(
           range,
         })),
   };
+  const refusal =
+    requireEstimate && next !== item.state
+      ? startRefusal(facts, next, item.n)
+      : null;
+  if (refusal) throw new Error(refusal);
   writeFileSync(file, withPlanState(markdown, item, next));
   appendFileSync(
     join(dir, PLAN_LOG),

package/ring/skills/referee/SKILL.md

@@ -2,6 +2,7 @@
 name: referee
 description: Orchestrates a refactor or a large delivery on a backend, frontend or mobile PR as its referee, at the venue the PR belongs to. One wrestler (Sonnet, effort high by default) writes in its own worktree; you (effort high) review each commit range with read-only cornermen against a numbered rulebook, every brief generated by `brief.mjs` with the rules embedded, send one rebound package at a time, open small do-not-merge round-bell PRs so the human reviews early, decide design doubts yourself from the rulebook and precedents (escalating only a short hard list), and keep a durable judges card so any new session can resume. Invoke with `/ring:referee start <pr>`, `/ring:referee resume [<pr>]`, `/ring:referee close`, "referee the refactor of #N", "resume the bout".
 argument-hint: "start <pr> | start --from-sparring <slug> | resume [<pr>] | close"
+effort: high
 ---
 
 # referee
@@ -212,7 +213,8 @@ way out, and it refuses without a KO. Then the bout runs as always, with three i
    `brief.mjs` briefs no wrestler. That is what a compaction or a new session resumes from.
    **Human review by blocks**: each point of the technical plan is a block. Give each its estimate
    and priority when the plan is made (`judges-card.mjs plan <pr> estimate <n> --minutes <m>
-   --priority <1-4>`), move it to «en curso» when its wrestler starts and to «espera al juez» when
+   --priority <1-4>`; the script refuses to start a block without both, or pass them with the
+   start: `plan <pr> <n> "en curso" --minutes <m> --priority <p>`), move it to «en curso» when its wrestler starts and to «espera al juez» when
    its review passes (that stamps the author, the times and the range PR Review Lab reviews). Every
    `humanReviewEvery` blocks waiting, brief.mjs stops: the human reviews that cut in PR Review Lab
    (bout mode) and signs a verdict with a Tape. The next brief applies it: a pass closes the

package/ring/skills/sparring/SKILL.md

@@ -2,6 +2,7 @@
 name: sparring
 description: Opens a sparring, a quick and deliberately low-quality draft (one PR per repo it touches, back and front included) that only proves whether a feature is worth building, before anyone pays for building it well. A rudo per repo (Sonnet at effort high by default) writes it inside a timebox in its own worktree; the draft PR (labels sparring + do-not-merge) is the event the host project's CI catches to deploy a preview; credentials travel by name only. The judge calls KO, rematch or discard, in two out of three falls: a KO passes the host gates (vestidor), faces the team's Tapes until a bell (unless «sin equipo»), keeps or loses the mask, and then hands each branch to a ring bout. Invoke with `/ring:sparring <idea | Linear ticket>`, `/ring:sparring preview <slug>`, `/ring:sparring verdict <slug>`, `/ring:sparring bell <slug>`, `/ring:sparring mask <slug> [kept|lost]`, `/ring:sparring list`, "make a quick draft of this to try it", "spar this feature first".
 argument-hint: '<idea | ticket> | preview <slug> | verdict <slug> | vestidor <slug> | bell <slug> | mask <slug> [kept|lost] | list'
+effort: high
 ---
 
 # sparring