Compare commits
2 Commits
c0148b8790
...
fa9db19bdc
| Author | SHA1 | Date | |
|---|---|---|---|
| fa9db19bdc | |||
| f8fc232de6 |
545
main.pb
545
main.pb
@@ -12,190 +12,190 @@
|
||||
#EnableDebug=#True
|
||||
|
||||
Global GitIgnoreHelpHTML.s = ~"<!DOCTYPE html>" + #LF$ +
|
||||
~"<html lang=\"fr\">" + #LF$ +
|
||||
~"<head>" + #LF$ +
|
||||
~" <meta charset=\"UTF-8\">" + #LF$ +
|
||||
~" <meta name=\"viewport\" content=\"width=device-width, initial-scale=1.0\">" + #LF$ +
|
||||
~" <title>Aide .gitignore</title>" + #LF$ +
|
||||
~" <style>" + #LF$ +
|
||||
~" body {" + #LF$ +
|
||||
~" font-family: 'Segoe UI', Tahoma, Geneva, Verdana, sans-serif;" + #LF$ +
|
||||
~" margin: 0;" + #LF$ +
|
||||
~" padding: 20px;" + #LF$ +
|
||||
~" background: linear-gradient(135deg, #667eea 0%, #764ba2 100%);" + #LF$ +
|
||||
~" color: #333;" + #LF$ +
|
||||
~" line-height: 1.6;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .container {" + #LF$ +
|
||||
~" max-width: 900px;" + #LF$ +
|
||||
~" margin: 0 auto;" + #LF$ +
|
||||
~" background: white;" + #LF$ +
|
||||
~" border-radius: 15px;" + #LF$ +
|
||||
~" padding: 30px;" + #LF$ +
|
||||
~" box-shadow: 0 20px 40px rgba(0,0,0,0.1);" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" h1 {" + #LF$ +
|
||||
~" color: #2c3e50;" + #LF$ +
|
||||
~" text-align: center;" + #LF$ +
|
||||
~" margin-bottom: 30px;" + #LF$ +
|
||||
~" font-size: 2.5em;" + #LF$ +
|
||||
~" background: linear-gradient(45deg, #667eea, #764ba2);" + #LF$ +
|
||||
~" -webkit-background-clip: text;" + #LF$ +
|
||||
~" -webkit-text-fill-color: transparent;" + #LF$ +
|
||||
~" background-clip: text;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" h2 {" + #LF$ +
|
||||
~" color: #34495e;" + #LF$ +
|
||||
~" border-left: 4px solid #667eea;" + #LF$ +
|
||||
~" padding-left: 15px;" + #LF$ +
|
||||
~" margin-top: 30px;" + #LF$ +
|
||||
~" font-size: 1.4em;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .syntax-box {" + #LF$ +
|
||||
~" background: #f8f9fa;" + #LF$ +
|
||||
~" border: 1px solid #e9ecef;" + #LF$ +
|
||||
~" border-radius: 8px;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" font-family: 'Consolas', 'Monaco', monospace;" + #LF$ +
|
||||
~" font-size: 0.9em;" + #LF$ +
|
||||
~" overflow-x: auto;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .example {" + #LF$ +
|
||||
~" background: linear-gradient(135deg, #667eea20, #764ba220);" + #LF$ +
|
||||
~" border-left: 4px solid #667eea;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" border-radius: 0 8px 8px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .tip {" + #LF$ +
|
||||
~" background: #e8f5e8;" + #LF$ +
|
||||
~" border: 1px solid #4caf50;" + #LF$ +
|
||||
~" border-radius: 8px;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .warning {" + #LF$ +
|
||||
~" background: #fff3e0;" + #LF$ +
|
||||
~" border: 1px solid #ff9800;" + #LF$ +
|
||||
~" border-radius: 8px;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" code {" + #LF$ +
|
||||
~" background: #f1f3f4;" + #LF$ +
|
||||
~" padding: 2px 6px;" + #LF$ +
|
||||
~" border-radius: 4px;" + #LF$ +
|
||||
~" font-family: 'Consolas', 'Monaco', monospace;" + #LF$ +
|
||||
~" color: #d73a49;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" ul {" + #LF$ +
|
||||
~" padding-left: 20px;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" li {" + #LF$ +
|
||||
~" margin: 8px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .pattern {" + #LF$ +
|
||||
~" display: inline-block;" + #LF$ +
|
||||
~" background: #667eea;" + #LF$ +
|
||||
~" color: white;" + #LF$ +
|
||||
~" padding: 3px 8px;" + #LF$ +
|
||||
~" border-radius: 4px;" + #LF$ +
|
||||
~" font-family: 'Consolas', 'Monaco', monospace;" + #LF$ +
|
||||
~" font-size: 0.9em;" + #LF$ +
|
||||
~" margin: 2px;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" </style>" + #LF$ +
|
||||
~"</head>" + #LF$ +
|
||||
~"<body>" + #LF$ +
|
||||
~" <div class=\"container\">" + #LF$ +
|
||||
~" <h1>📁 Guide .gitignore</h1>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <p>Le fichier <code>.gitignore</code> permet de spécifier quels fichiers et dossiers Git doit ignorer lors du versioning.</p>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🎯 Syntaxe de base</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"example\">" + #LF$ +
|
||||
~" <strong>Ignorer des fichiers spécifiques :</strong>" + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"config.txt # Ignore le fichier config.txt<br>" + #LF$ +
|
||||
~"*.log # Ignore tous les fichiers .log<br>" + #LF$ +
|
||||
~"temp/ # Ignore le dossier temp et tout son contenu" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🔧 Patterns et wildcards</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <ul>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">*</span> : correspond à n'importe quelle chaîne (sauf <code>/</code>)</li>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">**</span> : correspond à n'importe quel nombre de répertoires</li>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">?</span> : correspond à un seul caractère</li>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">[abc]</span> : correspond à a, b ou c</li>" + #LF$ +
|
||||
~" </ul>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🚫 Négation avec !</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"*.log<br>" + #LF$ +
|
||||
~"!important.log # Inclut ce fichier malgré la règle précédente" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>📍 Chemins</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"example\">" + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"/build # Ignore build à la racine uniquement<br>" + #LF$ +
|
||||
~"build/ # Ignore tous les dossiers build<br>" + #LF$ +
|
||||
~"docs/**/*.pdf # Ignore tous les PDF dans docs et ses sous-dossiers" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>💡 Exemples courants</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"# Fichiers de build<br>" + #LF$ +
|
||||
~"dist/<br>" + #LF$ +
|
||||
~"build/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Dépendances<br>" + #LF$ +
|
||||
~"node_modules/<br>" + #LF$ +
|
||||
~"vendor/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Configuration locale<br>" + #LF$ +
|
||||
~".env<br>" + #LF$ +
|
||||
~"config.local.json<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Logs et caches<br>" + #LF$ +
|
||||
~"*.log<br>" + #LF$ +
|
||||
~".cache/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Fichiers d'IDE<br>" + #LF$ +
|
||||
~".vscode/<br>" + #LF$ +
|
||||
~".idea/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Fichiers système<br>" + #LF$ +
|
||||
~".DS_Store<br>" + #LF$ +
|
||||
~"Thumbs.db" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"tip\">" + #LF$ +
|
||||
~" <strong>💡 Conseil :</strong> Utilisez des commentaires avec <code>#</code> pour documenter vos règles." + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"warning\">" + #LF$ +
|
||||
~" <strong>⚠️ Important :</strong> Le .gitignore ne s'applique qu'aux fichiers non-trackés. Pour ignorer des fichiers déjà versionnés, utilisez <code>git rm --cached <fichier></code>." + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🔍 Tester vos règles</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"git check-ignore -v <fichier> # Vérifie si un fichier est ignoré<br>" + #LF$ +
|
||||
~"git status --ignored # Affiche les fichiers ignorés" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~"</body>" + #LF$ +
|
||||
~"</html>"
|
||||
~"<html lang=\"fr\">" + #LF$ +
|
||||
~"<head>" + #LF$ +
|
||||
~" <meta charset=\"UTF-8\">" + #LF$ +
|
||||
~" <meta name=\"viewport\" content=\"width=device-width, initial-scale=1.0\">" + #LF$ +
|
||||
~" <title>Aide .gitignore</title>" + #LF$ +
|
||||
~" <style>" + #LF$ +
|
||||
~" body {" + #LF$ +
|
||||
~" font-family: 'Segoe UI', Tahoma, Geneva, Verdana, sans-serif;" + #LF$ +
|
||||
~" margin: 0;" + #LF$ +
|
||||
~" padding: 20px;" + #LF$ +
|
||||
~" background: linear-gradient(135deg, #667eea 0%, #764ba2 100%);" + #LF$ +
|
||||
~" color: #333;" + #LF$ +
|
||||
~" line-height: 1.6;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .container {" + #LF$ +
|
||||
~" max-width: 900px;" + #LF$ +
|
||||
~" margin: 0 auto;" + #LF$ +
|
||||
~" background: white;" + #LF$ +
|
||||
~" border-radius: 15px;" + #LF$ +
|
||||
~" padding: 30px;" + #LF$ +
|
||||
~" box-shadow: 0 20px 40px rgba(0,0,0,0.1);" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" h1 {" + #LF$ +
|
||||
~" color: #2c3e50;" + #LF$ +
|
||||
~" text-align: center;" + #LF$ +
|
||||
~" margin-bottom: 30px;" + #LF$ +
|
||||
~" font-size: 2.5em;" + #LF$ +
|
||||
~" background: linear-gradient(45deg, #667eea, #764ba2);" + #LF$ +
|
||||
~" -webkit-background-clip: text;" + #LF$ +
|
||||
~" -webkit-text-fill-color: transparent;" + #LF$ +
|
||||
~" background-clip: text;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" h2 {" + #LF$ +
|
||||
~" color: #34495e;" + #LF$ +
|
||||
~" border-left: 4px solid #667eea;" + #LF$ +
|
||||
~" padding-left: 15px;" + #LF$ +
|
||||
~" margin-top: 30px;" + #LF$ +
|
||||
~" font-size: 1.4em;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .syntax-box {" + #LF$ +
|
||||
~" background: #f8f9fa;" + #LF$ +
|
||||
~" border: 1px solid #e9ecef;" + #LF$ +
|
||||
~" border-radius: 8px;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" font-family: 'Consolas', 'Monaco', monospace;" + #LF$ +
|
||||
~" font-size: 0.9em;" + #LF$ +
|
||||
~" overflow-x: auto;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .example {" + #LF$ +
|
||||
~" background: linear-gradient(135deg, #667eea20, #764ba220);" + #LF$ +
|
||||
~" border-left: 4px solid #667eea;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" border-radius: 0 8px 8px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .tip {" + #LF$ +
|
||||
~" background: #e8f5e8;" + #LF$ +
|
||||
~" border: 1px solid #4caf50;" + #LF$ +
|
||||
~" border-radius: 8px;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .warning {" + #LF$ +
|
||||
~" background: #fff3e0;" + #LF$ +
|
||||
~" border: 1px solid #ff9800;" + #LF$ +
|
||||
~" border-radius: 8px;" + #LF$ +
|
||||
~" padding: 15px;" + #LF$ +
|
||||
~" margin: 15px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" code {" + #LF$ +
|
||||
~" background: #f1f3f4;" + #LF$ +
|
||||
~" padding: 2px 6px;" + #LF$ +
|
||||
~" border-radius: 4px;" + #LF$ +
|
||||
~" font-family: 'Consolas', 'Monaco', monospace;" + #LF$ +
|
||||
~" color: #d73a49;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" ul {" + #LF$ +
|
||||
~" padding-left: 20px;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" li {" + #LF$ +
|
||||
~" margin: 8px 0;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" .pattern {" + #LF$ +
|
||||
~" display: inline-block;" + #LF$ +
|
||||
~" background: #667eea;" + #LF$ +
|
||||
~" color: white;" + #LF$ +
|
||||
~" padding: 3px 8px;" + #LF$ +
|
||||
~" border-radius: 4px;" + #LF$ +
|
||||
~" font-family: 'Consolas', 'Monaco', monospace;" + #LF$ +
|
||||
~" font-size: 0.9em;" + #LF$ +
|
||||
~" margin: 2px;" + #LF$ +
|
||||
~" }" + #LF$ +
|
||||
~" </style>" + #LF$ +
|
||||
~"</head>" + #LF$ +
|
||||
~"<body>" + #LF$ +
|
||||
~" <div class=\"container\">" + #LF$ +
|
||||
~" <h1>📁 Guide .gitignore</h1>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <p>Le fichier <code>.gitignore</code> permet de spécifier quels fichiers et dossiers Git doit ignorer lors du versioning.</p>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🎯 Syntaxe de base</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"example\">" + #LF$ +
|
||||
~" <strong>Ignorer des fichiers spécifiques :</strong>" + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"config.txt # Ignore le fichier config.txt<br>" + #LF$ +
|
||||
~"*.log # Ignore tous les fichiers .log<br>" + #LF$ +
|
||||
~"temp/ # Ignore le dossier temp et tout son contenu" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🔧 Patterns et wildcards</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <ul>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">*</span> : correspond à n'importe quelle chaîne (sauf <code>/</code>)</li>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">**</span> : correspond à n'importe quel nombre de répertoires</li>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">?</span> : correspond à un seul caractère</li>" + #LF$ +
|
||||
~" <li><span class=\"pattern\">[abc]</span> : correspond à a, b ou c</li>" + #LF$ +
|
||||
~" </ul>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🚫 Négation avec !</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"*.log<br>" + #LF$ +
|
||||
~"!important.log # Inclut ce fichier malgré la règle précédente" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>📍 Chemins</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"example\">" + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"/build # Ignore build à la racine uniquement<br>" + #LF$ +
|
||||
~"build/ # Ignore tous les dossiers build<br>" + #LF$ +
|
||||
~"docs/**/*.pdf # Ignore tous les PDF dans docs et ses sous-dossiers" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>💡 Exemples courants</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"# Fichiers de build<br>" + #LF$ +
|
||||
~"dist/<br>" + #LF$ +
|
||||
~"build/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Dépendances<br>" + #LF$ +
|
||||
~"node_modules/<br>" + #LF$ +
|
||||
~"vendor/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Configuration locale<br>" + #LF$ +
|
||||
~".env<br>" + #LF$ +
|
||||
~"config.local.json<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Logs et caches<br>" + #LF$ +
|
||||
~"*.log<br>" + #LF$ +
|
||||
~".cache/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Fichiers d'IDE<br>" + #LF$ +
|
||||
~".vscode/<br>" + #LF$ +
|
||||
~".idea/<br>" + #LF$ +
|
||||
~"<br>" + #LF$ +
|
||||
~"# Fichiers système<br>" + #LF$ +
|
||||
~".DS_Store<br>" + #LF$ +
|
||||
~"Thumbs.db" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"tip\">" + #LF$ +
|
||||
~" <strong>💡 Conseil :</strong> Utilisez des commentaires avec <code>#</code> pour documenter vos règles." + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"warning\">" + #LF$ +
|
||||
~" <strong>⚠️ Important :</strong> Le .gitignore ne s'applique qu'aux fichiers non-trackés. Pour ignorer des fichiers déjà versionnés, utilisez <code>git rm --cached <fichier></code>." + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <h2>🔍 Tester vos règles</h2>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" <div class=\"syntax-box\">" + #LF$ +
|
||||
~"git check-ignore -v <fichier> # Vérifie si un fichier est ignoré<br>" + #LF$ +
|
||||
~"git status --ignored # Affiche les fichiers ignorés" + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~" " + #LF$ +
|
||||
~" </div>" + #LF$ +
|
||||
~"</body>" + #LF$ +
|
||||
~"</html>"
|
||||
|
||||
|
||||
; =============================================================================
|
||||
@@ -401,6 +401,7 @@ Structure listFilesGit
|
||||
statusDescription.s
|
||||
indexStatus.s
|
||||
workingTreeStatus.s
|
||||
importance.i
|
||||
EndStructure
|
||||
|
||||
Structure GitStatus
|
||||
@@ -451,6 +452,8 @@ UseModule Translate
|
||||
;-FUNCTION DECLARATIONS / DÉCLARATIONS DE FONCTIONS
|
||||
; =============================================================================
|
||||
Declare RefreshFileList(null.i)
|
||||
Declare.i StatusImportance(status.s)
|
||||
|
||||
|
||||
Procedure.i RunExe(*call.RunProgramCall)
|
||||
Protected prg.i, line$, lineError$, out$, err$
|
||||
@@ -507,6 +510,49 @@ EndProcedure
|
||||
|
||||
; ---- Helpers ---------------------------------------------------------------
|
||||
|
||||
; --- Importance par statut Gitpour le trie de
|
||||
Procedure.i StatusImportance(status.s)
|
||||
Protected x.s = Left(status, 1)
|
||||
Protected y.s = Mid(status, 2, 1)
|
||||
Protected score.i = 0
|
||||
|
||||
; Conflits d'abord
|
||||
Select status
|
||||
Case "DD","AU","UD","UA","DU","AA","UU"
|
||||
ProcedureReturn 1000
|
||||
EndSelect
|
||||
If x = "U" Or y = "U" : ProcedureReturn 1000 : EndIf
|
||||
|
||||
; Cas simples
|
||||
If status = "??" : ProcedureReturn 300 : EndIf ; Non suivis
|
||||
If status = "!!" : ProcedureReturn 50 : EndIf ; Ignorés
|
||||
If status = " " : ProcedureReturn 0 : EndIf ; Propres
|
||||
|
||||
; Index > Worktree
|
||||
If x <> " " : score + 700 : EndIf
|
||||
If y <> " " And y <> "?" And y <> "!" : score + 600 : EndIf
|
||||
|
||||
; Raffinement (X puis Y)
|
||||
Select x
|
||||
Case "D" : score + 80
|
||||
Case "R" : score + 70
|
||||
Case "A" : score + 60
|
||||
Case "M" : score + 50
|
||||
Case "C" : score + 40
|
||||
Case "T" : score + 30
|
||||
EndSelect
|
||||
Select y
|
||||
Case "D" : score + 40
|
||||
Case "R" : score + 35
|
||||
Case "A" : score + 30
|
||||
Case "M" : score + 25
|
||||
Case "C" : score + 20
|
||||
Case "T" : score + 15
|
||||
EndSelect
|
||||
|
||||
ProcedureReturn score
|
||||
EndProcedure
|
||||
|
||||
Procedure.s _SupTrim(text.s)
|
||||
If text = "" : ProcedureReturn "" : EndIf
|
||||
|
||||
@@ -628,7 +674,7 @@ EndProcedure
|
||||
; --- API publique : appelle ceci pour remplir la liste
|
||||
Procedure.i FillAllFilesRecursively()
|
||||
|
||||
root$ = GetCurrentDirectory()
|
||||
root$ = GetCurrentDirectory()
|
||||
|
||||
|
||||
; Normalise avec un séparateur de fin
|
||||
@@ -1261,23 +1307,30 @@ EndProcedure
|
||||
Procedure AddRemoteRepo(Url.s,name.s="origin")
|
||||
Url=_SupTrim(Url)
|
||||
name=_SupTrim(name)
|
||||
Debug "Url="+Url
|
||||
Debug "name="+name
|
||||
Protected add.b=#False
|
||||
;Check if this remote already exists
|
||||
main\Gitcall\args = "remote get-url "+name
|
||||
If RunExe(@main\Gitcall) = 0
|
||||
;if yes we remove it
|
||||
main\Gitcall\args = "remote remove "+name
|
||||
RunExe(@main\Gitcall)
|
||||
If Url<>_SupTrim(main\Gitcall\output)
|
||||
main\Gitcall\args = "remote remove "+name
|
||||
RunExe(@main\Gitcall)
|
||||
add=#True
|
||||
EndIf
|
||||
Else
|
||||
add=#True
|
||||
EndIf
|
||||
; We add a new remote
|
||||
main\Gitcall\args = "remote add "+name+" "+Url
|
||||
If RunExe(@main\Gitcall) = 0
|
||||
MessageRequester("Git Remote", "OK:" + #LF$ + main\Gitcall\output, #PB_MessageRequester_Info)
|
||||
If add=#True
|
||||
main\Gitcall\args = "remote add "+name+" "+Url
|
||||
If RunExe(@main\Gitcall) = 0
|
||||
;MessageRequester("Git Remote", "OK:" + #LF$ + main\Gitcall\output, #PB_MessageRequester_Info)
|
||||
ProcedureReturn #True
|
||||
Else
|
||||
MessageRequester("Git config", "Échec: " + #LF$ + main\Gitcall\errors, #PB_MessageRequester_Error)
|
||||
ProcedureReturn #False
|
||||
EndIf
|
||||
ProcedureReturn #True
|
||||
Else
|
||||
MessageRequester("Git config", "Échec: " + #LF$ + main\Gitcall\errors, #PB_MessageRequester_Error)
|
||||
ProcedureReturn #False
|
||||
EndIf
|
||||
EndProcedure
|
||||
|
||||
@@ -1351,7 +1404,7 @@ Procedure.s GetParentPath(path.s)
|
||||
|
||||
; Supprimer le séparateur final si présent
|
||||
If Right(Path, 1) = "\" Or Right(Path, 1) = "/"
|
||||
Path = Left(Path, Len(Path) - 1)
|
||||
Path = Left(Path, Len(Path) - 1)
|
||||
EndIf
|
||||
|
||||
; Utiliser GetPathPart() qui retourne le chemin sans le fichier/dossier final
|
||||
@@ -1378,13 +1431,13 @@ Procedure DoClone()
|
||||
|
||||
; Demander à l'utilisateur où cloner
|
||||
choice = MessageRequester("Git Clone - Destination",
|
||||
"Où voulez-vous cloner le dépôt ?" + #LF$ + #LF$ +
|
||||
"OUI: Créer un répertoire '" + repoName + "' dans le répertoire courant" + #LF$ +
|
||||
" → " + currentDir + repoName + "/" + #LF$ + #LF$ +
|
||||
"NON: Cloner directement dans le répertoire courant" + #LF$ +
|
||||
" → " + currentDir + #LF$ + #LF$ +
|
||||
"ANNULER: Annuler l'opération",
|
||||
#PB_MessageRequester_YesNoCancel)
|
||||
"Où voulez-vous cloner le dépôt ?" + #LF$ + #LF$ +
|
||||
"OUI: Créer un répertoire '" + repoName + "' dans le répertoire courant" + #LF$ +
|
||||
" → " + currentDir + repoName + "/" + #LF$ + #LF$ +
|
||||
"NON: Cloner directement dans le répertoire courant" + #LF$ +
|
||||
" → " + currentDir + #LF$ + #LF$ +
|
||||
"ANNULER: Annuler l'opération",
|
||||
#PB_MessageRequester_YesNoCancel)
|
||||
|
||||
Select choice
|
||||
Case #PB_MessageRequester_Yes
|
||||
@@ -1408,12 +1461,12 @@ Procedure DoClone()
|
||||
If RunExe(@main\Gitcall) = 0
|
||||
If targetFolder = "."
|
||||
MessageRequester("Git Clone", "Succès:" + #LF$ +
|
||||
"Dépôt cloné dans le répertoire courant" + #LF$ + #LF$ +
|
||||
main\Gitcall\output, #PB_MessageRequester_Info)
|
||||
"Dépôt cloné dans le répertoire courant" + #LF$ + #LF$ +
|
||||
main\Gitcall\output, #PB_MessageRequester_Info)
|
||||
Else
|
||||
MessageRequester("Git Clone", "Succès:" + #LF$ +
|
||||
"Dépôt cloné dans le répertoire: " + targetFolder + "/" + #LF$ + #LF$ +
|
||||
main\Gitcall\output, #PB_MessageRequester_Info)
|
||||
"Dépôt cloné dans le répertoire: " + targetFolder + "/" + #LF$ + #LF$ +
|
||||
main\Gitcall\output, #PB_MessageRequester_Info)
|
||||
EndIf
|
||||
AddRemoteRepo(remoteUrl)
|
||||
SetCurrentDirectory(GetGadgetText(#GgtFieldRepo))
|
||||
@@ -1811,6 +1864,13 @@ Procedure RefreshFileList(null.i)
|
||||
|
||||
GetGitStatus()
|
||||
|
||||
ForEach main\listFilesGit()
|
||||
main\listFilesGit()\importance = StatusImportance(main\listFilesGit()\status)
|
||||
Next
|
||||
|
||||
; --- Tri par importance (du plus important au moins important)
|
||||
SortStructuredList(main\listFilesGit(), #PB_Sort_Descending, OffsetOf(listFilesGit\importance), #PB_Integer)
|
||||
|
||||
Protected n.l=n-1
|
||||
ForEach main\listFilesGit()
|
||||
n=n+1
|
||||
@@ -1819,10 +1879,13 @@ Procedure RefreshFileList(null.i)
|
||||
SetGadgetItemState(#GdtListStatus,n,#PB_ListIcon_Checked)
|
||||
EndIf
|
||||
Next
|
||||
|
||||
|
||||
DisableGadget(#GdtListStatus,#False)
|
||||
DisableGadget(#GdtBtnRefresh,#False)
|
||||
GetBranchesList()
|
||||
GetRemoteUrl()
|
||||
GetCommitHistory()
|
||||
EndProcedure
|
||||
|
||||
Procedure UpdateHelp(txt.s)
|
||||
@@ -2081,26 +2144,26 @@ Procedure OpenGUI()
|
||||
; --- Fin des onglets ---
|
||||
CloseGadgetList()
|
||||
|
||||
; ============================================================
|
||||
; Aide à droite du Panel (sans splitter)
|
||||
; ============================================================
|
||||
; On garde #PanelW / #PanelH tels quels
|
||||
; ============================================================
|
||||
; Aide à droite du Panel (sans splitter)
|
||||
; ============================================================
|
||||
; On garde #PanelW / #PanelH tels quels
|
||||
|
||||
Define helpGap = 10 ; espace entre panel et aide
|
||||
Define helpX = #InPad + #PanelW + helpGap ; à droite du panel
|
||||
Define helpY = #InPad
|
||||
Define helpW = WindowWidth(#WinMain)-GadgetWidth(#gdtPnl)- #InPad*4 ; reste de largeur jusqu'à la marge droite
|
||||
Define helpH = #PanelH ; même hauteur que le panel
|
||||
Define helpGap = 10 ; espace entre panel et aide
|
||||
Define helpX = #InPad + #PanelW + helpGap ; à droite du panel
|
||||
Define helpY = #InPad
|
||||
Define helpW = WindowWidth(#WinMain)-GadgetWidth(#gdtPnl)- #InPad*4 ; reste de largeur jusqu'à la marge droite
|
||||
Define helpH = #PanelH ; même hauteur que le panel
|
||||
|
||||
; (Optionnel) borne minimale si besoin
|
||||
If helpW < 100 : helpW = 100 : EndIf
|
||||
; (Optionnel) borne minimale si besoin
|
||||
If helpW < 100 : helpW = 100 : EndIf
|
||||
|
||||
; Soit en direct :
|
||||
WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
; Soit en direct :
|
||||
WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
|
||||
; — ou, si tu veux un cadre :
|
||||
; FrameGadget(#GdtFrmHelp, helpX, helpY, helpW, helpH, T("GdtFrmHelp","Aide"))
|
||||
; WebViewGadget(#GdtHelp, helpX + 10, helpY + 25, helpW - 20, helpH - 35)
|
||||
; — ou, si tu veux un cadre :
|
||||
; FrameGadget(#GdtFrmHelp, helpX, helpY, helpW, helpH, T("GdtFrmHelp","Aide"))
|
||||
; WebViewGadget(#GdtHelp, helpX + 10, helpY + 25, helpW - 20, helpH - 35)
|
||||
|
||||
|
||||
SetGadgetText(#GgtFieldRepo,main\GitCall\workdir)
|
||||
@@ -2108,10 +2171,10 @@ WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
InitGadget()
|
||||
_SetTooltips()
|
||||
If FileSize(".git")=-2:main\info\isInit=#True:EndIf
|
||||
If main\info\isInit=#True
|
||||
GetRemoteUrl("origin")
|
||||
GetCommitHistory()
|
||||
EndIf
|
||||
;If main\info\isInit=#True
|
||||
; GetRemoteUrl("origin")
|
||||
; GetCommitHistory()
|
||||
;;EndIf
|
||||
|
||||
GetBranchesList()
|
||||
|
||||
@@ -2124,7 +2187,8 @@ WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
Quit=#True
|
||||
Case #PB_Event_Gadget
|
||||
Select EventGadget()
|
||||
Case #gdtPnl
|
||||
Case #GdtPnl
|
||||
Debug "Click>#gdtPnl"
|
||||
If EventType()=#PB_EventType_Change
|
||||
ReadGitIgnorefile()
|
||||
Select GetGadgetState(#GdtPnl)
|
||||
@@ -2134,17 +2198,22 @@ WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
|
||||
EndIf
|
||||
Case #GdtBtnInit
|
||||
Debug "Click>#GdtBtnInit"
|
||||
DoInit()
|
||||
CreateThread(@RefreshFileList(),0)
|
||||
Case #GdtBtnRefresh
|
||||
Debug "Click>#GdtBtnRefresh"
|
||||
CreateThread(@RefreshFileList(),0)
|
||||
Case #GgtFieldRepo
|
||||
|
||||
If EventType()=#PB_EventType_LostFocus
|
||||
Debug "Click>#GgtFieldRepo"
|
||||
main\GitCall\workdir=GetGadgetText(#GgtFieldRepo)
|
||||
CreateThread(@RefreshFileList(),0)
|
||||
EndIf
|
||||
|
||||
Case #GdtBtnBrowseRepo
|
||||
Debug "Click>#GdtBtnBrowseRepo"
|
||||
Protected path.s=PathRequester("Select Folder",main\GitCall\workdir,WindowID(#WinMain))
|
||||
If path<>"" And FileSize(path)=-2
|
||||
main\GitCall\workdir=path
|
||||
@@ -2158,15 +2227,21 @@ WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
; EndIf
|
||||
|
||||
Case #GdtBtnClone
|
||||
DoClone()
|
||||
Debug "Click>#GdtBtnClone"
|
||||
DoClone()
|
||||
Case #GdtBtnPush
|
||||
Debug "Click>#GdtBtnPush"
|
||||
DoPush()
|
||||
Case #GdtBtnPull
|
||||
Debug "Click>#GdtBtnPull"
|
||||
DoPull()
|
||||
Case #GdtListStatus
|
||||
Debug "Click>#GdtListStatus"
|
||||
Case #GdtBtnIgnore
|
||||
Debug "Click>#GdtBtnIgnore"
|
||||
ToggleGitIgnoreForSelection()
|
||||
Case #GdtBtnSaveGitIgnore
|
||||
Debug "Click>#GdtBtnSaveGitIgnore"
|
||||
Protected hf.i=CreateFile(#PB_Any,".gitignore")
|
||||
If hf
|
||||
WriteString(hf,GetGadgetText(#GdtTxtGitIgnore))
|
||||
@@ -2174,18 +2249,26 @@ WebViewGadget(#GdtHelp, helpX, helpY, helpW, helpH)
|
||||
EndIf
|
||||
|
||||
Case #GdtBtnCommit
|
||||
Debug "Click>#GdtBtnCommit"
|
||||
DoCommit()
|
||||
SetGadgetText(#GdtFieldMessage,"")
|
||||
CreateThread(@RefreshFileList(),0)
|
||||
Case #GdtFieldRemote
|
||||
Debug "Click>#GdtFieldRemote"
|
||||
|
||||
Case #GdtListHistory
|
||||
Debug "Click>#GdtListHistory"
|
||||
If EventType() = #PB_EventType_Change
|
||||
ShowSelectedCommitInfo()
|
||||
EndIf
|
||||
|
||||
Case #GdtSlctBranch
|
||||
Debug "Click>#GdtSlctBranch"
|
||||
Case #GdtSlctScope
|
||||
Debug "Click>#GdtSlctScope"
|
||||
GetGitIdentity()
|
||||
Case #GdtBtnSaveCfg
|
||||
Debug "Click>#GdtBtnSaveCfg"
|
||||
SetGitIdentity()
|
||||
|
||||
|
||||
@@ -2202,8 +2285,8 @@ OpenGUI()
|
||||
|
||||
|
||||
; IDE Options = PureBasic 6.21 (Windows - x64)
|
||||
; CursorPosition = 541
|
||||
; FirstLine = 509
|
||||
; CursorPosition = 1871
|
||||
; FirstLine = 1867
|
||||
; Folding = ----------
|
||||
; Optimizer
|
||||
; EnableThread
|
||||
|
||||
Reference in New Issue
Block a user