new file.

[lilypond.git] / lily / dot-column.cc

diff --git a/lily/dot-column.cc b/lily/dot-column.cc
index 584b3616e64e4286abf7fa56aafff7a7ebb6f1ae..2aa564dfa9d3a50f0366522f03601fb0a52d1c0d 100644 (file)
--- a/lily/dot-column.cc
+++ b/lily/dot-column.cc
@@ -44,7 +44,7 @@ Dot_column::side_position (SCM element_smob, SCM axis)
   Grob * stem = unsmob_grob (me->get_grob_property ("stem"));
   if (stem
       && !Stem::beam_l (stem)
-      && Stem::flag_i (stem))
+      && Stem::duration_log (stem) > 2)
     {
       /*
        trigger stem end & direction calculation.
@@ -124,11 +124,6 @@ Dot_column::do_shifts (SCM l)
   return SCM_UNSPECIFIED;
 }
 
-bool
-Dot_column::has_interface (Grob*m)
-{
-  return m && m->has_interface (ly_symbol2scm ("dot-column-interface"));
-}
 
 
 void
@@ -150,5 +145,5 @@ Dot_column::add_head (Grob * me, Grob *rh)
 
 ADD_INTERFACE (Dot_column, "dot-column-interface",
   "Interface that groups dots so they form a column",
-  "stem");
+  "direction stem");