X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fbeam-quanting.cc;h=695cb80b6eb2b8a950758b403b7e3bc3cb021507;hb=f9214bac21e9926dc3248416f58190c98c4167a9;hp=fc60f8def08ed25b1529ebcd8ff5bca05fca0167;hpb=1969599b5f61d43d353e39e5b1cc1854a35a1684;p=lilypond.git

diff --git a/lily/beam-quanting.cc b/lily/beam-quanting.cc
index fc60f8def0..695cb80b6e 100644
--- a/lily/beam-quanting.cc
+++ b/lily/beam-quanting.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 1997--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
   Jan Nieuwenhuizen <janneke@gnu.org>
 */
 
@@ -154,8 +154,8 @@ Beam::quanting (SCM smob, SCM posns)
   for (int a = 2; a--;)
     common[a] = common_refpoint_of_array (stems, me, Axis (a));
 
-  Grob *fvs = first_visible_stem (me);
-  Grob *lvs = last_visible_stem (me);
+  Grob *fvs = first_normal_stem (me);
+  Grob *lvs = last_normal_stem (me);
   Real xl = fvs ? fvs->relative_coordinate (common[X_AXIS], X_AXIS) : 0.0;
   Real xr = fvs ? lvs->relative_coordinate (common[X_AXIS], X_AXIS) : 0.0;
 
@@ -323,7 +323,7 @@ Beam::quanting (SCM smob, SCM posns)
 
       // debug quanting
       me->set_property ("quant-score",
-			scm_makfrom0str (qscores[best_idx].score_card_.c_str ()));
+			ly_string2scm (qscores[best_idx].score_card_));
     }
 #endif