From: hanwen <hanwen>
Date: Sun, 21 Jul 2002 20:24:57 +0000 (+0000)
Subject: * lily/lyric-extender.cc (brew_molecule): don't add
X-Git-Tag: release/1.5.71~122
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=7600cc96db55df40ec0b0c4013e47af5e2d38fcd;p=lilypond.git

* lily/lyric-extender.cc (brew_molecule): don't add
right-trim-amount if extender is broken.

* scripts/ly2dvi.py (global_latex_preamble): bugfix (thanks Werner).
---

diff --git a/ChangeLog b/ChangeLog
index 85e443528f..cc86db65d5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2002-07-21  Han-Wen  <hanwen@cs.uu.nl>
+
+	* lily/lyric-extender.cc (brew_molecule): don't add
+	right-trim-amount if extender is broken.
+
+	* scripts/ly2dvi.py (global_latex_preamble): bugfix (thanks Werner).
+
 2002-07-21  Jan Nieuwenhuizen  <janneke@gnu.org>
 
 	* Documentation/index.texi: Add pointers to new regression and
diff --git a/lily/lyric-extender.cc b/lily/lyric-extender.cc
index 9cb03b14ec..104cc9e76c 100644
--- a/lily/lyric-extender.cc
+++ b/lily/lyric-extender.cc
@@ -21,17 +21,27 @@ SCM
 Lyric_extender::brew_molecule (SCM smob) 
 {
   Spanner *sp = unsmob_spanner (smob);
-
-  // ugh: refp
-  Real leftext = sp->get_bound (LEFT)->extent (sp->get_bound (LEFT),
-					       X_AXIS).length ();
+  Item* l = sp->get_bound (LEFT);
+  Item*r = sp->get_bound (RIGHT);
+  
+  Real leftext = l->extent (l, X_AXIS).length ();
 
   Real sl = sp->paper_l ()->get_var ("linethickness");  
   Real righttrim = 0.5; // default to half a space gap on the right
-  SCM righttrim_scm = sp->get_grob_property ("right-trim-amount");
-  if (gh_number_p (righttrim_scm)) {
-    righttrim = gh_scm2double (righttrim_scm);
-  }
+
+
+  /*
+    If we're broken, we shouldn't extend past the end of the line.
+   */
+  if (r->break_status_dir () == CENTER)
+    {
+      SCM righttrim_scm = sp->get_grob_property ("right-trim-amount");
+      if (gh_number_p (righttrim_scm))
+	{
+	  righttrim = gh_scm2double (righttrim_scm);
+	}
+    }
+  
   // The extender can exist in the word space of the left lyric ...
   SCM space =  sp->get_bound (LEFT)->get_grob_property ("word-space");
   if (gh_number_p (space))
diff --git a/scripts/ly2dvi.py b/scripts/ly2dvi.py
index b023a3de00..a810bb7a52 100644
--- a/scripts/ly2dvi.py
+++ b/scripts/ly2dvi.py
@@ -599,7 +599,7 @@ def global_latex_preamble (extra):
 	s = s + '\\documentclass[%s]{article}\n' % options
 
 	if extra['language']:
-		s = s + r'\usepackage[%s]{babel}\n' % extra['language'][-1]
+		s = s + r'\usepackage[%s]{babel}' % extra['language'][-1] + '\n'
 
 
 	s = s + '\\usepackage{%s}\n' \