Simplification remplacement symbole bémol

diff --git a/gtx2tex.pl b/gtx2tex.pl
index c310d20..be4396e 100644 (file)
--- a/gtx2tex.pl
+++ b/gtx2tex.pl
@@ -253,13 +253,7 @@ sub crdpro { # Bearbeitung der Zeile aus der Eingabedatei
         }
 
         s/#/$sharp/g;     # Remplace le symbole '#' par le symbole diese
-        s/\{Ab/{A$flat/g; # Remplace le 'b' de l'accord par le symbole bemol
-        s/\{Bb/{B$flat/g;
-        s/\{Cb/{C$flat/g;
-        s/\{Db/{D$flat/g;
-        s/\{Eb/{E$flat/g;
-        s/\{Fb/{F$flat/g;
-        s/\{Gb/{G$flat/g;
+        s/b/$flat/g;      # Remplace le 'b' dans l'accord par le symbole bemol
 
         if ( $italian ) {
             s/gtxchord\{D/gtxchord{Re/g;