(start_translation_timestep): split

[lilypond.git] / lily / grace-engraver.cc

diff --git a/lily/grace-engraver.cc b/lily/grace-engraver.cc
index 352fc840fd57325acd08aed5f3a72e367ebae1b5..ee998dda5d64d8577562cd1672830245510d9cd9 100644 (file)
--- a/lily/grace-engraver.cc
+++ b/lily/grace-engraver.cc
@@ -65,7 +65,7 @@ Grace_engraver::start_translation_timestep ()
          SCM context_name = scm_car (entry);
          SCM grob = scm_cadr (entry);
          SCM sym = scm_caddr (entry);
-         SCM val = scm_cadddr (entry);
+         SCM val = scm_cadr (scm_cddr (entry));
 
          Context *c = context ();
          while (c