From d4ed7f952ee8460e89e7818cdcc95450b194f33e Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Wed, 27 Mar 2002 02:03:20 +0000
Subject: [PATCH] lilypond-1.5.15

---
 input/bugs/beam-space.ly | 23 +++++++++++++++++++++++
 lily/beam.cc             |  5 +++--
 2 files changed, 26 insertions(+), 2 deletions(-)
 create mode 100644 input/bugs/beam-space.ly

diff --git a/input/bugs/beam-space.ly b/input/bugs/beam-space.ly
new file mode 100644
index 0000000000..46c7f4c5f8
--- /dev/null
+++ b/input/bugs/beam-space.ly
@@ -0,0 +1,23 @@
+
+
+u = { \translator Staff = up \stemDown }
+m = { \translator Staff = mid \stemUp }
+
+global = \notes { \key fis \major \time 6/8 }
+
+righta = \notes \transpose c'' {
+ \repeat unfold 4 { \m [a,16 \u d a d] \m [c \u d c' d ] [c \m b,] [d \u d ] } ]
+}
+
+
+\score { \notes
+  \context PianoStaff <
+    \context Staff = up {
+      \clef G \global \righta
+    }
+    \context Staff = mid {
+      \clef F \global s2. *4
+    }
+  >
+  \paper { }
+}
diff --git a/lily/beam.cc b/lily/beam.cc
index e25ca0db06..9e433827b6 100644
--- a/lily/beam.cc
+++ b/lily/beam.cc
@@ -802,11 +802,12 @@ Beam::stem_beams (Grob*me,Item *here, Item *next, Item *prev,
 
 
   Direction dir = Directional_element_interface::get (me);
-  
+
   /* [Tremolo] beams on whole notes may not have direction set? */
  if (dir == CENTER)
     dir = Directional_element_interface::get (here);
-  
+
+
   /* half beams extending to the left. */
   if (prev)
     {
-- 
2.39.5