From: fred <fred>
Date: Sun, 24 Mar 2002 19:31:42 +0000 (+0000)
Subject: lilypond-0.0.32
X-Git-Tag: release/1.5.59~5394
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=522922f9695229fb41b277c3a0fbf8b329c8d442;p=lilypond.git

lilypond-0.0.32
---

diff --git a/src/beam.cc b/src/beam.cc
index 44d51e0af9..1b0fa2baa3 100644
--- a/src/beam.cc
+++ b/src/beam.cc
@@ -217,7 +217,10 @@ Beam::stem_beams(Stem *here, Stem *next, Stem *prev)const
 	int lhalfs= lhalfs = here->beams_left - prev->beams_right ;
 	int lwholebeams= here->beams_left <? prev->beams_right ;
 	Real w = (here->hpos() - prev->hpos())/4;
-	Atom a =  paper()->lookup_p_->beam(sl, w);
+	Symbol dummy;
+	Atom a(dummy);
+	if (lhalfs)		// generates warnings if not
+	    a =  paper()->lookup_p_->beam(sl, w);
 	a.translate(Offset (-w, -w * sl));
 	for (int j = 0; j  < lhalfs; j++) {
 	    Atom b(a);
@@ -239,8 +242,10 @@ Beam::stem_beams(Stem *here, Stem *next, Stem *prev)const
 	    b.translate(Offset(0, -dir_i_ * dy * j));
 	    rightbeams.add( b ); 
 	}
+
 	w /= 4;
-	a = paper()->lookup_p_->beam(sl, w);
+	if (rhalfs)
+	    a = paper()->lookup_p_->beam(sl, w);
 	
 	for (; j  < rwholebeams + rhalfs; j++) {
 	    Atom b(a);