From 0833c5d89c24bf34c5197c401ce732e1894f6d1d Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Sun, 4 May 1997 20:16:41 +0000
Subject: [PATCH] lilypond-0.0.59

---
 input/scsii-menuetto.ly | 20 ++++++++++----------
 lily/note-column.cc     |  8 ++++++--
 2 files changed, 16 insertions(+), 12 deletions(-)

diff --git a/input/scsii-menuetto.ly b/input/scsii-menuetto.ly
index 3f8f11436c..7781055764 100644
--- a/input/scsii-menuetto.ly
+++ b/input/scsii-menuetto.ly
@@ -12,7 +12,7 @@
 % The purpose of this file is to demonstrate features of LilyPond.
 % (there is an accompanying LaTeX file, scsii-menuetto.tex)
 %
-\version "0.0.56";
+\version "0.0.57";
 %% Stuff from MPP version
 % \lefttitle{Menuetto}
 % \tempo{Moderato}
@@ -56,40 +56,40 @@ ii_menuetto = \melodic{
 	< e'2 a2 \f >
 	[ d'( e'16 )f'16 ] |
 %%10
-	< [ e' g > d' cis'_"2" e' a( )g ] |
+	< [ e' g > d' cis'_"2" e' a~  g ] |
 %%11
 	< \multivoice  
-		{\stem 1; a4() d'4 cis'4-. }
+		{\stem 1; a4~  d'4 cis'4-. }
 		{ \stem -1; f2 e4 } > |
 %%12
-	< [ g'^"4" d > f' e' f' d'^"3"( ) c' ] |
+	< [ g'^"4" d > f' e' f' d'^"3"~   c' ] |
 %%13
 	\clef "alto";
 	< \multivoice
 		 { \stem 1; bes2 c'4 }
-		 { \stem -1; g4() f4 e4 }% ugh
+		 { \stem -1; g4~  f4 e4 }% ugh
 	> |
 %%14
 	< [ a f > g a f ] < d'4-\upbow e4 'bes4 > |
 %%15
-	< c'4-\downbow f4 'a4 > [ bes( )a g a ] |
+	< c'4-\downbow f4 'a4 > [ bes~  a g a ] |
 %%16
 	[ f( e )f a-. g-. bes-. ] |
 %%17
 	< a2^"0" fis2_"3" > bes4 |
 %%18
-	< { [ c'( )bes c' a ] } { [ es ] } > fis4 |
+	< { [ c'~  bes c' a ] } { [ es ] } > fis4 |
 %%19
 	< d'4-\downbow g4 'bes4 > < c'4-\upbow g4 c4 > < [ bes d > a ] |
 %%20
-	< { [ c'( bes a )bes g( )bes ] } { [ d ] } { [ g ] } > |
+	< { [ c'( bes a )bes g~  bes ] } { [ d ] } { [ g ] } > |
 %%21
 	< \multivoice  
-		{\stem 1;  d'4(\stem 1; ) cis'4 d'4 }  
+		{\stem 1;  d'4 (\stem 1; ) cis'4 d'4 }  
 		{ \stem -1; g2 f4 } 
 	> |
 %%22
-	< { [ g( )f g e ] } { [ cis ] } > < f4 d4 > |
+	< { [ g~  f g e ] } { [ cis ] } > < f4 d4 > |
 %%23
 	[ 'g g ] < e4. 'a4. > d-\upbow |
 %%24
diff --git a/lily/note-column.cc b/lily/note-column.cc
index e40724976a..f0c518a5b7 100644
--- a/lily/note-column.cc
+++ b/lily/note-column.cc
@@ -55,6 +55,10 @@ Note_column::head_positions_interval()const
 void
 Note_column::do_pre_processing()
 {
-    if (!dir_i_)
-	dir_i_ = stem_l_->dir_i_;
+    if (!dir_i_){
+	if (stem_l_)
+	    dir_i_ = stem_l_->dir_i_;
+	else 
+	    dir_i_ = (head_positions_interval().center() >=  5) ? -1 : 1;
+    }
 }
-- 
2.11.4.GIT