Deleted File no checked by default

This commit is contained in:
2025-08-17 15:49:04 +02:00
parent a907dfdb37
commit a64406c37b
2 changed files with 18 additions and 5 deletions

Binary file not shown.

View File

@@ -1915,6 +1915,16 @@ EndProcedure
; - showIgnored=1 → inclut aussi les fichiers ignorés (!!) ; - showIgnored=1 → inclut aussi les fichiers ignorés (!!)
; - Vérifie l'existence côté disque ; si absent et pas un delete, marque "NF" (Introuvable) ; - Vérifie l'existence côté disque ; si absent et pas un delete, marque "NF" (Introuvable)
; - rows()\include = 1 pour les éléments potentiellement à committer (≠ OK/!!) ; - rows()\include = 1 pour les éléments potentiellement à committer (≠ OK/!!)
; Build rows() list with all files (according to options), WITHOUT name correction
; Construit la liste rows() avec tous les fichiers (selon options), SANS correction de nom
; - showClean=1 → include tracked "clean" files (OK)
; - showIgnored=1 → also include ignored files (!!)
; - Check disk-side existence; if missing and not a delete, mark "NF" (Not Found)
; - rows()\include = 1 for elements potentially to commit (≠ OK/!!) BUT NOT for deleted files
; - showClean=1 → inclut les fichiers suivis "propres" (OK)
; - showIgnored=1 → inclut aussi les fichiers ignorés (!!)
; - Vérifie l'existence côté disque ; si absent et pas un delete, marque "NF" (Introuvable)
; - rows()\include = 1 pour les éléments potentiellement à committer (≠ OK/!!) MAIS PAS pour les fichiers supprimés
Procedure.i BuildFullFileList(repoDir$, showClean.i, showIgnored.i, List rows.FileRow()) Procedure.i BuildFullFileList(repoDir$, showClean.i, showIgnored.i, List rows.FileRow())
Protected gc.GitCall Protected gc.GitCall
Protected text$, line$, code$, file$ Protected text$, line$, code$, file$
@@ -2003,7 +2013,8 @@ Procedure.i BuildFullFileList(repoDir$, showClean.i, showIgnored.i, List rows.Fi
rows()\include = 0 rows()\include = 0
Else Else
rows()\stat = code$ rows()\stat = code$
rows()\include = Bool(code$ <> "OK" And code$ <> "!!") ; Ne pas cocher par défaut les fichiers supprimés (D) et les fichiers OK/ignorés
rows()\include = Bool(code$ <> "OK" And code$ <> "!!" And isDelete = 0)
EndIf EndIf
Next Next
@@ -2027,14 +2038,16 @@ Procedure.i BuildFullFileList(repoDir$, showClean.i, showIgnored.i, List rows.Fi
rows()\include = 0 rows()\include = 0
Else Else
rows()\stat = code$ rows()\stat = code$
rows()\include = 1 ; Ne pas cocher par défaut les fichiers supprimés
Protected isDeleteUntracked.i = 0
If Left(code$, 1) = "D" Or Right(code$, 1) = "D" : isDeleteUntracked = 1 : EndIf
rows()\include = Bool(isDeleteUntracked = 0)
EndIf EndIf
EndIf EndIf
Next Next
ProcedureReturn ListSize(rows()) ProcedureReturn ListSize(rows())
EndProcedure EndProcedure
; Get filename from line 'index' from internal list / Récupère le nom de fichier de la ligne 'index' depuis la liste interne ; Get filename from line 'index' from internal list / Récupère le nom de fichier de la ligne 'index' depuis la liste interne
Procedure.s FileFromRowsByIndex(index.i, List rows.FileRow()) Procedure.s FileFromRowsByIndex(index.i, List rows.FileRow())
Protected j.i = 0 Protected j.i = 0
@@ -2848,8 +2861,8 @@ EndIf
; END OF FILE / FIN DU FICHIER ; END OF FILE / FIN DU FICHIER
; ============================================================================= ; =============================================================================
; IDE Options = PureBasic 6.21 (Windows - x64) ; IDE Options = PureBasic 6.21 (Windows - x64)
; CursorPosition = 2342 ; CursorPosition = 2049
; FirstLine = 2317 ; FirstLine = 2010
; Folding = ----------- ; Folding = -----------
; EnableXP ; EnableXP
; DPIAware ; DPIAware