]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/context-def.cc
Fix some bugs in the dynamic engraver and PostScript backend
[lilypond.git] / lily / context-def.cc
index d77b075322ed0433ac17a367f4ffcde327a8f5e1..fee67b661d043ad86a7777039fd84c7fabc53bb4 100644 (file)
@@ -298,6 +298,7 @@ Context_def::instantiate (SCM ops, Object_key const *key)
     context = new Context (key);
 
   context->definition_ = self_scm ();
+  context->definition_mods_ = ops;
 
   SCM trans_names = get_translator_names (ops);
 
@@ -343,9 +344,8 @@ Context_def::instantiate (SCM ops, Object_key const *key)
   else if (dynamic_cast<Performer_group *> (g))
     g->simple_trans_list_ = filter_engravers (g->simple_trans_list_);
 
-  g->context_ = context;
   context->aliases_ = context_aliases_;
-
+  g->connect_to_context (context);
   g->unprotect ();
 
   context->accepts_list_ = get_accepted (ops);