From 90790dbefd94dc2fb796a4afa8aed0b4a3b596b4 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Tue, 26 Mar 2002 23:25:37 +0000
Subject: [PATCH] lilypond-1.3.76

---
 Documentation/user/refman.itely |  7 +++++++
 input/test/vertical-extent.ly   | 21 +++++++++++++++++----
 scripts/ly2dvi.py               |  1 -
 scripts/mudela-book.py          |  7 ++++++-
 tex/lilyponddefs.tex            |  6 +++++-
 tex/titledefs.tex               |  3 ---
 6 files changed, 35 insertions(+), 10 deletions(-)

diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely
index d385fd0cdc..2ca219cde2 100644
--- a/Documentation/user/refman.itely
+++ b/Documentation/user/refman.itely
@@ -2480,6 +2480,13 @@ Nevertheless, here are some variables you may want to use or change:
     Sets the width of the lines.  If set to -1.0, a single
     unjustified line is produced.
 
+  @item @code{textheight}@indexcode{textheight}  
+    Sets the total height of the music on each page. Only used by
+    ly2dvi.
+
+  @item @code{interscoreline}@indexcode{interscoreline}  
+    Sets the spacing between the score lines. Defaults to 16 pt.
+
   @item @code{output}@indexcode{output}  
     Specifies an alternate name for the the output @file{s}.
     A @file{.tex}, @file{.midi} or @file{.ps} extension will be 
diff --git a/input/test/vertical-extent.ly b/input/test/vertical-extent.ly
index b944b43fe2..b8cf58ed87 100644
--- a/input/test/vertical-extent.ly
+++ b/input/test/vertical-extent.ly
@@ -1,7 +1,20 @@
 
 \score {
-\notes \context Staff {
-  \property Staff.StaffVerticalExtent = #'(-15.0 . 15.0)
-  c1 \break c1 
-}
+  \notes  <
+    \context Staff = upper {
+      \property Staff.StaffVerticalExtent = #'(-15.0 . 0.0)
+      \clef alto;
+      c1 \break c1 
+    }
+    \context Staff = lower {
+      \property Staff.StaffVerticalExtent = #'(-0.0 . 15.0)
+      \clef alto;
+      g1 \break g1 
+    }
+  >
+  \paper{
+    interscoreline = 3.0\mm;
+    \translator{\ScoreContext \remove "Bar_number_engraver";}
+    \translator{\StaffContext StaffMinimumVerticalExtent = #'(-2.0 . 2.0)}
+  }
 }
diff --git a/scripts/ly2dvi.py b/scripts/ly2dvi.py
index e5484a52dd..0147f1da29 100644
--- a/scripts/ly2dvi.py
+++ b/scripts/ly2dvi.py
@@ -264,7 +264,6 @@ class TeXOutput:
 %%\headsep0pt
 %% Maybe this is too drastic, but let us give it a try.
 \geometry{width=%spt, textheight=%spt,headheight=2mm,headsep=0pt,footskip=2mm} 
-\input{lilyponddefs}
 \input{titledefs}
 %s
 \makeatletter
diff --git a/scripts/mudela-book.py b/scripts/mudela-book.py
index ca4b70f8ad..d82d949dfe 100644
--- a/scripts/mudela-book.py
+++ b/scripts/mudela-book.py
@@ -695,7 +695,12 @@ def compile_all_files (chunks):
 		system ('lilypond %s %s' % (lilyopts, texfiles))
 
 	for e in eps:
-		cmd = r"""tex '\nonstopmode \input %s'; dvips -E -o %s %s""" % \
+		if os.environ.has_key('OS') and \
+                   os.environ['OS'] == 'Windows_95':
+                    	cmd = r"""ash -c 'tex " \nonstopmode \input %s " ; dvips -E -o %s %s ' """ % \
+		      (e, e + '.eps', e)
+                else:
+                	cmd = r"""tex '\nonstopmode \input %s' ;  dvips -E -o %s %s""" % \
 		      (e, e + '.eps', e)
 		system (cmd)
 
diff --git a/tex/lilyponddefs.tex b/tex/lilyponddefs.tex
index 3a67da9183..f6bca234e4 100644
--- a/tex/lilyponddefs.tex
+++ b/tex/lilyponddefs.tex
@@ -34,7 +34,11 @@
 \def\myfilbreak{\par\vfil\penalty200\vfilneg}
 
 % stacked horizontal lines
-\def\interscoreline{\vskip 16pt\myfilbreak}
+\ifundefined{mudelapaperinterscoreline}
+        \def\interscoreline{\vskip 16pt\myfilbreak}
+\else
+        \def\interscoreline{\vskip\mudelapaperinterscoreline pt\myfilbreak}
+\fi
 \def\placebox#1#2#3{%
         \botalign{\hbox{\raise #1\leftalign{\kern #2{}#3}}}}%
 
diff --git a/tex/titledefs.tex b/tex/titledefs.tex
index 6d0477533b..b6c9c7570b 100644
--- a/tex/titledefs.tex
+++ b/tex/titledefs.tex
@@ -4,9 +4,6 @@
 %
 % Version 0.1
 %
-\input lilyponddefs
-\def\EndLilyPondOutput{\endinput}
-%
 \def\thetitle{}
 \def\thesubtitle{}
 \def\thecomposer{}
-- 
2.39.5