release: 1.1.64

[lilypond.git] / lily / stem.cc

diff --git a/lily/stem.cc b/lily/stem.cc
index 3551ad97cfdf43cf191fe80ff1e40b34458fc9c4..2dd984cac7a9f698f915af59a4e7017fcfbb5aa5 100644 (file)
--- a/lily/stem.cc
+++ b/lily/stem.cc
@@ -149,10 +149,13 @@ Stem::get_center_distance (Direction d) const
 Direction
 Stem::get_default_dir () const
 {
-  return (get_center_distance (UP) >
-         get_center_distance (DOWN)) 
-    ? DOWN 
-    : UP;
+  int du = get_center_distance (UP);
+  int dd = get_center_distance (DOWN);
+
+  if (sign (dd - du))
+    return Direction (sign (dd -du));
+
+  return Direction (int(paper_l ()->get_var ("stem_default_neutral_direction")));
 }
 
 Direction