Say in a condition's message which issue tracks it and where that issue stands (issue 400)

The operator could not tell from a notification whether its cause was
known, tracked and being fixed, or whether they had to act. The issue
tracker gains the verb tracking, answering for every condition key an
issue links which issues link it and where each stands; the operator
channel's router asks it outside the work and says one line from it in
every condition's message, per hq ADR 0285.

modules/mesh-issues/cmd/mesh-issues/main.go

@@ -22,7 +22,7 @@ import (
 const Seat = "issue-tracker"
 
 // Verbs are the seat's verbs, as the manifest declares and claims them.
-var Verbs = []string{"open", "get", "list", "move", "note", "link", "import", "groom", "set"}
+var Verbs = []string{"open", "get", "list", "move", "note", "link", "import", "groom", "set", "tracking"}
 
 func logf(format string, a ...any) { fmt.Fprintf(os.Stderr, format+"\n", a...) }
 
@@ -602,5 +602,26 @@ func Tools(t *Tracker) []stdio.Tool {
 				}
 				return t.Set(ask)
 			}},
+		{Name: Seat + ".tracking",
+			Description: "Which issues track which conditions: for every condition key an issue links (link kind condition), " +
+				"or only the keys given, the issues that link it, those not resolved first, each with its status, " +
+				"severity, what it needs, who works on it since when and whether they went quiet (stale), and where its " +
+				"fix is (fix: not-merged, merged, held, failed, unheard or delivered; empty when none is named). The " +
+				"operator's channel asks it to say in a condition's message which issue tracks it. Refused: a key not of a condition " +
+				"key's shape.",
+			Input: schema(nil, map[string]any{
+				"conditions": texts("only these condition keys, such as module.mounts.shanks.unhealthy; all when not given"),
+			}),
+			Run: func(m map[string]any) (any, error) {
+				a, err := readArgs("tracking", m, "conditions")
+				if err != nil {
+					return nil, err
+				}
+				keys, err := a.list("conditions")
+				if err != nil {
+					return nil, err
+				}
+				return t.Tracking(keys)
+			}},
 	}
 }