From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 16 Oct 2006 11:07:28 +0000 (+0000)
Subject: * Documentation/topdocs/NEWS.tely (Top): idem.
X-Git-Tag: release/2.10.0-2~160
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=b876d401aa2a5ef7145e406e7200c6114d4d9888;p=lilypond.git

* Documentation/topdocs/NEWS.tely (Top): idem.

* input/regression/lyric-tie.ly (texidoc): use vowels for tied
lyrics example.

* scm/define-markup-commands.scm (tied-lyric): increase negative
space: space syllables tighter.
---

diff --git a/ChangeLog b/ChangeLog
index b014476bd0..80ac49fee6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,13 @@
 2006-10-16  Han-Wen Nienhuys  <hanwen@lilypond.org>
 
+	* Documentation/topdocs/NEWS.tely (Top): idem.
+
+	* input/regression/lyric-tie.ly (texidoc): use vowels for tied
+	lyrics example.
+
+	* scm/define-markup-commands.scm (tied-lyric): increase negative
+	space: space syllables tighter.
+
 	* VERSION (PATCH_LEVEL): bump version.
 
 	* scm/paper.scm: patch by Arvid Gr"otting, arvidgr@gmail.com: tune
diff --git a/Documentation/topdocs/NEWS.tely b/Documentation/topdocs/NEWS.tely
index b4c580b51a..db90c2441b 100644
--- a/Documentation/topdocs/NEWS.tely
+++ b/Documentation/topdocs/NEWS.tely
@@ -113,7 +113,7 @@ symbol,
 @lilypond[relative=1,fragment,ragged-right]
   { c4 f2 g4 }
   \addlyrics {
-    o la~la la
+    o la~oo ah
   } 
 @end lilypond
 
diff --git a/input/regression/lyric-tie.ly b/input/regression/lyric-tie.ly
index d4ae7d0743..1d024979cf 100644
--- a/input/regression/lyric-tie.ly
+++ b/input/regression/lyric-tie.ly
@@ -6,5 +6,5 @@ texidoc = "Tildes in lyric syllables are converted to tie symbols."
 \version "2.9.22"
 
 \lyrics {
-  bla~blo~blub 
+  wa~o~a 
 }
diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm
index fc04991a58..4d87479283 100644
--- a/scm/define-markup-commands.scm
+++ b/scm/define-markup-commands.scm
@@ -296,7 +296,7 @@ grestore
 	(interpret-markup layout 
 			  (prepend-alist-chain
 			   'word-space
-			   (/ (interval-length (ly:stencil-extent join-stencil X)) -4)
+			   (/ (interval-length (ly:stencil-extent join-stencil X)) -3.5)
 			   props)
 			  (make-line-markup joined)))
 			   ;(map (lambda (s) (interpret-markup layout props s)) parts))