X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fcontext-property.cc;h=1ccfe5a970973e7ce3be409406985dcafd0e42f7;hb=cd9b21c7688389e6be24eec51e54be327ae5bdd1;hp=be27388eaeb17688f2604e899725268ae567de21;hpb=70365334614c31a82e9a3860c9eb9334cdc2879a;p=lilypond.git diff --git a/lily/context-property.cc b/lily/context-property.cc index be27388eae..1ccfe5a970 100644 --- a/lily/context-property.cc +++ b/lily/context-property.cc @@ -231,14 +231,15 @@ apply_property_operations (Context *tg, SCM pre_init_ops) SCM type = scm_car (entry); entry = scm_cdr (entry); if (!scm_is_pair (entry)) - continue; + continue; SCM context_prop = scm_car (entry); - if (scm_is_pair (context_prop)) { - if (tg->is_alias (scm_car (context_prop))) - context_prop = scm_cdr (context_prop); - else - continue; - } + if (scm_is_pair (context_prop)) + { + if (tg->is_alias (scm_car (context_prop))) + context_prop = scm_cdr (context_prop); + else + continue; + } if (type == ly_symbol2scm ("push")) { @@ -255,7 +256,7 @@ apply_property_operations (Context *tg, SCM pre_init_ops) else if (type == ly_symbol2scm ("assign")) tg->set_property (context_prop, scm_cadr (entry)); else if (type == ly_symbol2scm ("apply")) - scm_apply_1 (context_prop, tg->self_scm (), scm_cdr (entry)); + scm_apply_1 (context_prop, tg->self_scm (), scm_cdr (entry)); } }