From 6229420dee05d451cee9bf7a641135fd4f444ace Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sat, 7 Jun 2003 17:16:21 +0000
Subject: [PATCH] (run_latex, run_dvips, 'main'): Make preview for all
 LilyPond-produced tex snippets.

---
 ChangeLog         |  3 +++
 scripts/ly2dvi.py | 49 +++++++++++++++++++++++++++++------------------
 2 files changed, 33 insertions(+), 19 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 73d3d63d63..390ece3e20 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2003-06-07  Jan Nieuwenhuizen  <janneke@gnu.org>
 
+	* scripts/ly2dvi.py (run_latex, run_dvips, 'main'): Make preview
+	for all LilyPond-produced tex snippets.
+
 	* tex/lilyponddefs.tex: Allow overriding of interscoreline.  This
 	fixes one line --preview output of ly2dvi.
 
diff --git a/scripts/ly2dvi.py b/scripts/ly2dvi.py
index aecd6fb6f0..4b0851b0aa 100644
--- a/scripts/ly2dvi.py
+++ b/scripts/ly2dvi.py
@@ -514,21 +514,25 @@ None
 		ly.exit (1)
 	
 	if preview_p:
-		# make a preview by rendering only the 1st line.
-		preview_fn = outbase + '.preview.tex'
-		f = open (preview_fn, 'w')
-		wfs = find_tex_files (files, extra)
-		s = global_latex_definition (wfs, extra)
-
-		s = re.sub ('thispagestyle{firstpage}', r'''thispagestyle{empty}%
-\\def\\interscoreline{\\endinput}''',s ) 
-		s = re.sub ('thispagestyle{lastpage}', r'''thispagestyle{empty}%
-\\def\\interscoreline{\\endinput}''',s ) 
-		f.write (s)
-		f.close()
-		cmd = '%s \\\\nonstopmode \\\\input %s' % (latex_cmd, preview_fn)
-		ly.system (cmd)
-	
+		# make a preview by rendering only the 1st line
+		# of each score
+		for score in find_tex_files (files, extra):
+			preview_base = ly.strip_extension (score[0], '.tex')
+			preview_fn = preview_base + '.preview.tex'
+			s = global_latex_definition ((score,), extra)
+			s = re.sub ('thispagestyle{firstpage}',
+				    r'''thispagestyle{empty}%
+				    \\def\\interscoreline{\\endinput}''', s)
+			s = re.sub ('thispagestyle{lastpage}',
+				    r'''thispagestyle{empty}%
+				    \\def\\interscoreline{\\endinput}''', s)
+			f = open (preview_fn, 'w')
+			f.write (s)
+			f.close ()
+			cmd = '%s \\\\nonstopmode \\\\input %s' \
+			      % (latex_cmd, preview_fn)
+			ly.system (cmd)
+
 
 def run_dvips (outbase, extra):
 
@@ -568,8 +572,12 @@ Using bitmap fonts instead. This will look bad.'''))
 	ly.system (cmd)
 
 	if preview_p:
-		cmd = 'dvips -E -o%s %s' % ( outbase + '.preview.ps', outbase + '.preview.dvi')		
-		ly.system (cmd)
+		for score in find_tex_files (files, extra):
+			preview_base = ly.strip_extension (score[0], '.tex')
+			cmd = 'dvips -E -o%s %s' \
+			      % (preview_base + '.preview.ps',
+				 preview_base + '.preview.dvi')
+			ly.system (cmd)
 
 	if 'PDF' in targets:
 		cmd = 'ps2pdf %s.ps %s.pdf' % (outbase , outbase)
@@ -878,7 +886,9 @@ if 1:
 				ly.warning (_("Failed to make PS file. Rerun with --verbose for a trace."))
 
 	if preview_p:
-		ly.make_preview (outbase)
+		for score in find_tex_files (files, extra_init):
+			preview_base = ly.strip_extension (score[0], '.tex')
+			ly.make_preview (preview_base)
 
 	if 'PDFTEX' in targets:
 		try:
@@ -956,7 +966,8 @@ if 1:
 			ly.warning (_ ("can't find file: `%s'") % outname)
 
 	if html_p:
-		make_html_menu_file (os.path.join (outdir, outbase + ".html"), files_found)
+		make_html_menu_file (os.path.join (outdir, outbase + ".html"),
+				     files_found)
 
 	os.chdir (original_dir)
 	ly.cleanup_temp ()
-- 
2.39.5