lilypond-1.1.36

diff --git a/lily/auto-beam-engraver.cc b/lily/auto-beam-engraver.cc
index 1fd4be94400790128ef2e0c732cac49f97da6ecc..1396f68e752cc61f244281f2857493d6902f5fa4 100644 (file)
--- a/lily/auto-beam-engraver.cc
+++ b/lily/auto-beam-engraver.cc
@@ -173,7 +173,7 @@ Auto_beam_engraver::create_beam_p ()
   /* urg, copied from Beam_engraver */
   Scalar prop = get_property ("beamslopedamping", 0);
   if (prop.isnum_b ()) 
-    beam_p->damping_i_ = prop;
+    beam_p->set_elt_property (damping_scm_sym, gh_int2scm( prop));
 
   prop = get_property ("beamquantisation", 0);
   if (prop.isnum_b ()) 

diff --git a/lily/beam-engraver.cc b/lily/beam-engraver.cc
index d855e41dea98623217ba935724bc90f8e575d63c..9afca27c9f750b5083aef816673ca661ec4b7826 100644 (file)
--- a/lily/beam-engraver.cc
+++ b/lily/beam-engraver.cc
@@ -73,8 +73,8 @@ Beam_engraver::do_process_requests ()
 
       Scalar prop = get_property ("beamslopedamping", 0);
       if (prop.isnum_b ()) 
-       beam_p_->damping_i_ = prop;
-
+       beam_p_->set_elt_property (damping_scm_sym, gh_int2scm( prop));
+      
       prop = get_property ("beamquantisation", 0);
       if (prop.isnum_b ()) 
        beam_p_->quantisation_ = (Beam::Quantisation)(int)prop;