From c8a2d1a4ac433ab596ca7d3b35655f4d49de5712 Mon Sep 17 00:00:00 2001
From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 22 Aug 2005 14:06:11 +0000
Subject: [PATCH] * input/regression/tie-manual.ly: new file

* input/regression/tie-chord.ly: update.
---
 ChangeLog                      |  4 ++
 input/regression/tie-chord.ly  | 70 +++++++++++++++++++++++++++-------
 input/regression/tie-manual.ly | 20 ++++++++++
 3 files changed, 81 insertions(+), 13 deletions(-)
 create mode 100644 input/regression/tie-manual.ly

diff --git a/ChangeLog b/ChangeLog
index c2dc35e837..47b4c746fd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2005-08-22  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
+	* input/regression/tie-manual.ly: new file
+
+	* input/regression/tie-chord.ly: update.
+
 	* flower/include/interval.hh (struct Interval_t): 
 
 	* lily/tie.cc (distance): new function 
diff --git a/input/regression/tie-chord.ly b/input/regression/tie-chord.ly
index 2230837fd9..c77c51a6ba 100644
--- a/input/regression/tie-chord.ly
+++ b/input/regression/tie-chord.ly
@@ -1,23 +1,67 @@
+\header {
+
+
+  texidoc = "In chords, ties keep closer to the note head vertically,
+but never collide with heads or stems. Seconds are formatted up/down;
+the rest of the ties are positioned according to their  vertical position."
+  
 
-\version "2.6.0"
-\header{
-  texidoc="
-When tying chords, the outer ties point outwards, the inner ties
-point away from the center of the staff. The behavior can be overridden 
-by setting explicitly the @code{direction} of a @code{TieColumn}.
-"
 }
 
+\version "2.7.7"
 
-t =  \relative c' {   <c e g> ~ <c e g> }
+\paper {
+  indent = #0.0
+  raggedright = ##t
+}
 
+testShort =
+{
+   \time 4/4
+  \key c \major
+  \relative c'' {
+				%  c ~ c
+    <c e> ~ <c e>
+    <b c e> ~ <b c e>
+    <a c e> ~ <a c e>
+    <a b e> ~ <a b e>
+    <a b e f> ~ <a b e f> 
+  }
 
-\context Voice {
-  \t
-  \transpose c g \t
+  \relative c' {
+    <c e f a> ~ <c e f a>
+    <c e g a> ~ <c e g a>
+    
+    <a' c d f> ~ <a c d f>  
+    <a c e f> ~ <a c e f>
+    <a b c d e> ~ <a b c d e>
+  }
+}  
 
-  \t
+testLong =
+{
+  \time 5/8
+  \key c \major
+  \relative c'' {
+    <c e>2 ~ <c e>8
+    <b c e>2 ~ <b c e>8
+    <a c e>2 ~ <a c e>8
+    <a b e>2 ~ <a b e>8
+    <a b e f>2 ~ <a b e f>8
+  }
 
-}
+  \relative c' {
+    <c e f a>2 ~ <c e f a>8
+    <c e g a>2 ~ <c e g a>8
+    <a' c d f>2  ~   <a c d f>8  
+    <a c e f>2  ~   <a c e f>8  
+  }
+}  
 
+\new Voice
+{ \testShort \break
+  \transpose c d \testShort \break
+  \testLong \break
+  \transpose c d \testLong \break
+}
 
diff --git a/input/regression/tie-manual.ly b/input/regression/tie-manual.ly
new file mode 100644
index 0000000000..079852eba2
--- /dev/null
+++ b/input/regression/tie-manual.ly
@@ -0,0 +1,20 @@
+\header {
+
+  texidoc = "Tie formatting may be adjusted manually, by setting the
+@code{tie-configuration} property."
+
+}
+
+\version "2.7.7"
+
+\layout {
+  raggedright = ##t
+}
+
+
+\relative c'' {
+  \override TieColumn #'tie-configuration =
+  #'((0 . -1)  (2 . -1) (5.5 . 1) (7 . 1))
+  
+  <b d f g>~  <b d f g>
+} 
-- 
2.39.2