X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=ly%2Fscale-definitions-init.ly;h=450092024944478d429e4f9701c4c2b91a5c16e5;hb=187f5d255574bb4cfe744cbccf10aec821d6ae6e;hp=975686f667f8392add917d4a648db1be879b234b;hpb=aa384518d059d26ffd6c0da3068fbdc2a345ecc1;p=lilypond.git

diff --git a/ly/scale-definitions-init.ly b/ly/scale-definitions-init.ly
index 975686f667..4500920249 100644
--- a/ly/scale-definitions-init.ly
+++ b/ly/scale-definitions-init.ly
@@ -1,7 +1,7 @@
-\version "1.5.49"
+\version "2.12.0"
 
 
-major = #'(
+major = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
@@ -11,18 +11,18 @@ major = #'(
     (6 . 0)
   )
 
-minor = #'(
+minor = #`(
     (0 . 0)
     (1 . 0)
-    (2 . -1)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
-    (5 . -1)
-    (6 . -1)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
     )
 
 
-ionian = #'(
+ionian = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
@@ -33,68 +33,68 @@ ionian = #'(
   )  
 
 
-locrian = #'(
+locrian = #`(
     (0 . 0)
-    (1 . -1)
-    (2 . -1)
+    (1 . ,FLAT)
+    (2 . ,FLAT)
     (3 . 0)
-    (4 . -1)
-    (5 . -1)
-    (6 . -1)
+    (4 . ,FLAT)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
   )  
 
 
-aeolian = #'(
+aeolian = #`(
     (0 . 0)
     (1 . 0)
-    (2 . -1)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
-    (5 . -1)
-    (6 . -1)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
     )
 
 
-mixolydian = #'(
+mixolydian = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
     (3 . 0)
     (4 . 0)
     (5 . 0)
-    (6 . -1)
+    (6 . ,FLAT)
   )  
 
 
-lydian = #'(
+lydian = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
-    (3 . 1)
+    (3 . ,SHARP)
     (4 . 0)
     (5 . 0)
     (6 . 0)
   )  
 
 
-phrygian = #'(
+phrygian = #`(
     (0 . 0)
-    (1 . -1)
-    (2 . -1)
+    (1 . ,FLAT)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
-    (5 . -1)
-    (6 . -1)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
 )  
 
 
-dorian = #'(
+dorian = #`(
     (0 . 0)
     (1 . 0)
-    (2 . -1)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
     (5 . 0)
-    (6 . -1)
+    (6 . ,FLAT)
   )