release: 1.3.103

[lilypond.git] / lily / translator-def.cc

diff --git a/lily/translator-def.cc b/lily/translator-def.cc
index 3a9cc88de92ccd7c02de3cb7258375d854f62432..668d5a70ea387558867a41a9abd9c2f118d14997 100644 (file)
--- a/lily/translator-def.cc
+++ b/lily/translator-def.cc
@@ -308,13 +308,13 @@ Translator_def::default_child_context_name ()
 SCM
 Translator_def::to_alist ()const
 {
-  SCM l =  SCM_EOL;
-
+  SCM l = SCM_EOL;
+  
   l = gh_cons (gh_cons (ly_symbol2scm ("consists"),  consists_name_list_), l);
   l = gh_cons (gh_cons (ly_symbol2scm ("end-consists"),  end_consists_name_list_), l);
   l = gh_cons (gh_cons (ly_symbol2scm ("accepts"),  accepts_name_list_), l);
   l = gh_cons (gh_cons (ly_symbol2scm ("property-ops"),  property_ops_), l);
-  l = gh_cons (gh_cons (ly_symbol2scm ("type-name"),  type_name_), l);
+  l = gh_cons (gh_cons (ly_symbol2scm ("type-name"),  type_name_), l); // junkme.
   l = gh_cons (gh_cons (ly_symbol2scm ("group-type"),  translator_group_type_), l);    
 
   return l;