lilypond-1.3.0

diff --git a/lily/paper-score.cc b/lily/paper-score.cc
index ef983e80539069e8b1115411e0839cc8a4749fad..d8cba19d43f13871999e83186695482e1bbada58 100644 (file)
--- a/lily/paper-score.cc
+++ b/lily/paper-score.cc
@@ -50,6 +50,9 @@ Paper_score::typeset_element (Score_element * elem_p)
 
   SCM_CDR(element_smob_list_) = gh_cons (elem_p->self_scm_,
                                         SCM_CDR (element_smob_list_));
+  elem_p->set_elt_property (ly_symbol ("full-name"),
+                           gh_str02scm((char*)elem_p->name()));
+  
   scm_unprotect_object (elem_p->self_scm_);
 }