From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Wed, 26 May 2004 13:21:55 +0000 (+0000)
Subject: (header): kludge: hard code linewidth.
X-Git-Tag: release/2.3.2~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=29e9fb2c921a4d7c32320fde2f53968b5f75c27b;p=lilypond.git

(header): kludge: hard code linewidth.
---

diff --git a/ChangeLog b/ChangeLog
index 1abfdfc38a..99082be3b4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2004-05-26  Han-Wen Nienhuys   <hanwen@xs4all.nl>
 
+	* scm/output-tex.scm (header): kludge: hard code linewidth. 
+
 	* lily/my-lily-parser.cc (My_lily_parser): don't delete lexer.
 
 2004-05-25  Han-Wen Nienhuys   <hanwen@xs4all.nl>
diff --git a/scm/output-tex.scm b/scm/output-tex.scm
index dbc8a67b67..e44ab4c316 100644
--- a/scm/output-tex.scm
+++ b/scm/output-tex.scm
@@ -264,7 +264,13 @@
        "")
    ;; FIXME: duplicated in every backend
    "\\def\\lilypondtagline{Engraved by LilyPond (version "
-   (lilypond-version)")}\n"))
+   (lilypond-version)")}\n"
+
+   ;; FIXME
+   ;; this is -of course- severely broken, (--hwn)
+   (tex-string-def  "lilypondpaper" 'linewidth
+		    "18cm")
+   ))
 
 (define (output-tex-string s)
    (if (ly:get-option 'safe)
diff --git a/scripts/lilypond.py b/scripts/lilypond.py
index 2a45a682d4..9e0e160ef1 100644
--- a/scripts/lilypond.py
+++ b/scripts/lilypond.py
@@ -486,7 +486,7 @@ def run_dvips (outbase, extra):
 leaving a PS file in OUTBASE.ps
 '''
 	#FIXME: papersize, orientation must come from lilypond-bin
-
+	opts = ''
 	if extra['papersize']:
 		opts = ' -t%s' % extra['papersize'][0]