test

[lilypond.git] / ly / grace-init.ly

diff --git a/ly/grace-init.ly b/ly/grace-init.ly
index 39079b3396f6ab0b67197ad4546df3705d3d7184..96f3d4073e9399fd57bdd5291c6cf9c2d8a7d811 100644 (file)
--- a/ly/grace-init.ly
+++ b/ly/grace-init.ly
@@ -1,7 +1,7 @@
 
 startGraceMusic = {
     \property Voice.Stem \override  #'direction = #1
-    \property Voice.Stem \override #'length = #6
+    \property Voice.Stem \override #'length = #5.5
     \property Voice.Stem \override #'lengths = 
         #(map (lambda (x) (* 0.8 x)) '(3.5 3.5 3.5 4.5 5.0))
     \property Voice.Stem \override #'beamed-lengths =
@@ -26,13 +26,13 @@ startGraceMusic = {
     % be smaller as well.
 
     \property Voice.fontSize = #-2
-    \property Staff.Accidentals \override #'font-relative-size = #-2
+    \property Staff.Accidental \override #'font-relative-size = #-2
     \property Voice.Slur \override #'direction = #-1
 }
 
 stopGraceMusic = {
     \property Voice.Slur \revert #'direction
-    \property Staff.Accidentals \revert #'font-relative-size
+    \property Staff.Accidental \revert #'font-relative-size
     \property Voice.Beam \revert #'thickness
 
     \property Voice.Stem \revert #'flag-style