From 202a2c912f0eff3dd713cf207dcace375c336285 Mon Sep 17 00:00:00 2001
From: Hugo Villeneuve <hugo@hugovil.com>
Date: Thu, 5 May 2022 16:40:32 -0400
Subject: [PATCH] Traduction de commentaires

---
 gtx2tex.pl | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/gtx2tex.pl b/gtx2tex.pl
index 3c2f7b6..b8278ac 100644
--- a/gtx2tex.pl
+++ b/gtx2tex.pl
@@ -224,31 +224,32 @@ sub crdpro { # Bearbeitung der Zeile aus der Eingabedatei
     } else {
 
 	if ( $uppercase ) {
-            $_ = uc($_); # Toutes les lettres en majuscule.
+            $_ = uc($_); # Toutes les lettres en majuscule (incluant les accords).
         }
 
         s/\s/$space/g; 				# Remplace une séquence de plusieurs espaces par un seul
-        s/(\^)(.*?)(\])/\\\(^\{\2\}\\\)\]/g;	# Ziffern hochstellen / Place les chiffres en haut?
+        s/(\^)(.*?)(\])/\\\(^\{\2\}\\\)\]/g;	# Place le texte suivant '^' en exposant
 
         s/\[/\}\\gtxchord{/g;			# linke Klammer ersetzen / Remplace crochet gauche
         s/\]/}{/g;				# rechte Klammer ersetzen / Remplace crochet droit
-        #	s/(\})(.*?)(\\)/}{\2}\\/g;	# Text zwischen Akkorden in geschweifte Klammern setzen
-        s/$/}/; # rechte Klammer am Ende der Zeile ergänzen
-        s/^\}//; # rechte Klammer am Anfang der Zeile entfernen
+        s/$/}/;  # Ajoute une accolade droite à la fin de la ligne
+        s/^\}//; # Supprime l'accolade droite en début de ligne
         if ( $_ !~ /^\\/ ) {
+            # Ajoute une élément \gtxchord sans accord: \gtxchord{}{TEXTE}
             s/^/\\gtxchord\{\}\{/
         }
 
         $verbose && print "Accord: <$_>\n";
 
         if ( $uppercase ) {
-            s/(gtxchord\{[A-G][B#]?)MAJ7/\1$majeur_sept/g;            # Remplace 'gtxchord{AM'  par 'gtxchord{Am'
+            # Accord Majeur7
+            s/(gtxchord\{[A-G][B#]?)MAJ7/\1$majeur_sept/g;
 
-            # On recherche le nom de l'accord, suivi d'un bémol ou dièse optionel, suivi de 'sus' + 1 chiffre.
+            # Accord suivi d'un bémol ou dièse optionel, suivi de 'sus' + 1 chiffre.
             s/(gtxchord\{[A-G][B#]?[0-9]?)SUS([0-9]+)/\1\$^{sus\2}\$/g;
 
             # Accord demi-diminué
-            # On recherche le nom de l'accord, suivi d'un bémol ou dièse optionel, suivi de 'm7b5'.
+            # Accord, suivi d'un bémol ou dièse optionel, suivi de 'm7b5'.
             s/(gtxchord\{[A-G][B#]?)M7B5/\1$half_diminished/g;
 
             # Accords diminués
-- 
2.20.1