]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/grace-engraver.cc
Doc: NR Update information for modern-cautionary
[lilypond.git] / lily / grace-engraver.cc
index b4fdbec695784a4de5cdfdbbd217fecb1e2c996d..5279cab4c0fb2ed3fa7f2dd03bc4846a84d998a0 100644 (file)
@@ -120,10 +120,7 @@ Grace_engraver::consider_change_grace_settings ()
           if (!scm_is_pair (sym))
             sym = scm_list_1 (sym);
 
-          Context *c = context ();
-          while (c && !c->is_alias (context_name))
-            c = c->get_parent_context ();
-
+          Context *c = find_context_above (context (), context_name);
           if (c)
             {
               SCM cell = Grob_property_info (c, grob).push (sym, val);