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.

2026-10-25 23:32:01 +01:00
parent 7ea942a118
commit fbec5cb499
10 changed files with 1368 additions and 0 deletions
@@ -531,9 +531,11 @@ func (s *Server) deployPageData(w http.ResponseWriter, r *http.Request, name str
 	data["RestoreRecordedAddress"] = ""
 	data["RestoreRecordedDeclaresPath"] = declaresDataPath
 	data["RestoreHasRecord"] = false
+	data["KeptBackups"] = 0 // R-1278: backups of an earlier install the box keeps (set-aside or removed-app units)
 	// Part 1's visibility line needs the real path, not a literal in a template.
 	data["SystemDataPath"] = s.cfg.Paths.SystemDataPath
 	if !alreadyDeployed && s.backupMgr != nil {
+		data["KeptBackups"] = s.backupMgr.KeptBackupsFor(name)
 		if place, addr, ok := s.backupMgr.RecordedUnitForStack(name); ok {
 			prefill := map[string]string{}
 			if addr.Known() {