R-1278: the install page says when a backup of an earlier install is kept and links the restore page (HU and EN). Red-proved. Commit only.

controller/internal/backup/unit_owner_test.go

@@ -373,3 +373,21 @@ func TestR1288_ARestoreOfASetAsideUnitRetiresTheReplacedUnitQuietly(t *testing.T
 		t.Fatalf("the next backup set something aside again: alarms %v, set-aside %v", alarms, r.setAside(t))
 	}
 }
+
+// R-1278: the install page's count of an earlier install's kept backups — a set-aside unit counts once per copy.
+func TestR1278_KeptBackupsForCountsTheSetAsideUnits(t *testing.T) {
+	r := d47Setup(t, "aaaa000000000001")
+	if n := r.m.KeptBackupsFor("tandoor"); n != 0 {
+		t.Fatalf("before any set-aside: %d", n)
+	}
+	r.reinstall("bbbb000000000002")
+	if err := r.m.captureRecoveryUnit("tandoor", false); err != nil {
+		t.Fatal(err)
+	}
+	if n := r.m.KeptBackupsFor("tandoor"); n != 1 {
+		t.Fatalf("after one set-aside: %d, want 1", n)
+	}
+	if n := r.m.KeptBackupsFor("other"); n != 0 {
+		t.Fatalf("another app counts nothing: %d", n)
+	}
+}