]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/grace-music.cc
release: 1.5.4
[lilypond.git] / lily / grace-music.cc
index 9e88f7b835cb21d35933b7e8c969f618c2643b90..27c88c6f7b66ab283946a1b23ca5ee1dad9f9c34 100644 (file)
@@ -21,7 +21,7 @@ Grace_music::length_mom () const
 {
   Moment l = Music_wrapper::length_mom ();
   Moment gl;
-  gl.grace_mom_ = l.main_part_ + l.grace_mom_ ;
+  gl.grace_part_ = l.main_part_ + l.grace_part_ ;
   return gl;
 }
 
@@ -29,7 +29,7 @@ Grace_music::length_mom () const
 Moment
 Grace_music::start_mom () const
 {
-  return Music::start_mom ();
+  return - length_mom ();
 }
 
 Grace_music::Grace_music ()