]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/dot-column.cc
Typos.
[lilypond.git] / lily / dot-column.cc
index 133f88ad3c68bb3f143f8a12997754c9182289b2..36c95137970240f526faff57515c68e8f7753f07 100644 (file)
@@ -83,21 +83,31 @@ Dot_column::calc_positioning_done (SCM smob)
         
         Rest collisions should wait after line breaking.
       */
+      Interval y;
       if (Rest::has_interface (s))
        {
          base_x.unite (s->extent (commonx, X_AXIS));
          continue;
        }
+      else if (Stem::has_interface (s))
+       {
+         Real y1 = Stem::head_positions (s)[-get_grob_direction (s)];
+         Real y2 = y1 + get_grob_direction (s) * 7;
+
+         y.add_point (y1);
+         y.add_point (y2);
+       }
+      else
+       y = s->extent (s, Y_AXIS);
 
-      Interval y = s->extent (s, Y_AXIS);
       y *= 2 / ss;
       y += Staff_symbol_referencer::get_position (s);
          
       Box b (s->extent (commonx, X_AXIS), y);
       boxes.push_back (b);
 
-      if (Grob *s = unsmob_grob (s->get_object ("stem")))
-       stems.insert (s);
+      if (Grob *stem = unsmob_grob (s->get_object ("stem")))
+       stems.insert (stem);
     }
 
   for (set<Grob*>::const_iterator i(stems.begin());