release: 1.3.56

[lilypond.git] / lily / crescendo.cc

diff --git a/lily/crescendo.cc b/lily/crescendo.cc
index fd390e0826cbea3ebcfcb1dd9f82e00bbdd7db14..d119ca9a04cf818ae9e70b370e11c56517aafd5a 100644 (file)
--- a/lily/crescendo.cc
+++ b/lily/crescendo.cc
@@ -24,6 +24,7 @@ Crescendo::Crescendo (SCM s)
 
 
 
+MAKE_SCHEME_SCORE_ELEMENT_CALLBACKS(Crescendo)
 Molecule 
 Crescendo::do_brew_molecule () const
 {
@@ -36,7 +37,7 @@ Crescendo::do_brew_molecule () const
   if (!isdir_b (dir) || !gh_pair_p (dyns))
     {
       Crescendo * me = (Crescendo*)this;
-      me->set_elt_property ("transparent", SCM_BOOL_T);
+      me->suicide ();
       Molecule m;
       
       return m;