/ChangeLog/1.2466/Wed Aug 18 15:25:05 2004//

  nicolas:~/cvs/lilypond> make web
  [...]
  Now processing `lily-1249256772.ly'
  [...]
  /home/nicolas/cvs/lilypond/share/lilypond/scm/framework-tex.scm:188:17: In 
expression (ly:paper-book-lines book):
  /home/nicolas/cvs/lilypond/share/lilypond/scm/framework-tex.scm:188:17: Unbound 
variable: ly:paper-book-lines

Should it be ly:paper-book-systems? (make web likes better)

Index: scm/framework-ps.scm
===================================================================
RCS file: /cvsroot/lilypond/lilypond/scm/framework-ps.scm,v
retrieving revision 1.21
diff -u -r1.21 framework-ps.scm
--- scm/framework-ps.scm	13 Aug 2004 15:53:22 -0000	1.21
+++ scm/framework-ps.scm	18 Aug 2004 19:46:17 -0000
@@ -213,7 +213,7 @@
 
 (define-public (output-preview-framework outputter book scopes fields basename)
   (let* ((bookpaper (ly:paper-book-book-paper book))
-	 (systems (ly:paper-book-lines book))
+	 (systems (ly:paper-book-systems book))
 	 (scale  (ly:output-def-lookup bookpaper 'outputscale ))
 	 (titles (take-while ly:paper-system-title? systems))
 	 (non-title (find (lambda (x)
Index: scm/framework-tex.scm
===================================================================
RCS file: /cvsroot/lilypond/lilypond/scm/framework-tex.scm,v
retrieving revision 1.16
diff -u -r1.16 framework-tex.scm
--- scm/framework-tex.scm	25 Jul 2004 13:10:51 -0000	1.16
+++ scm/framework-tex.scm	18 Aug 2004 19:46:17 -0000
@@ -185,7 +185,7 @@
 (define-public (output-classic-framework
 		outputter book scopes fields basename)
   (let* ((bookpaper (ly:paper-book-book-paper book))
-	 (lines (ly:paper-book-lines book))
+	 (lines (ly:paper-book-systems book))
 	 (last-line (car (last-pair lines))))
     (for-each
      (lambda (x)
@@ -206,7 +206,7 @@
 (define-public (output-preview-framework
 		outputter book scopes fields basename )
   (let* ((bookpaper (ly:paper-book-book-paper book))
-	 (lines (ly:paper-book-lines book)))
+	 (lines (ly:paper-book-systems book)))
     (for-each
      (lambda (x)
        (ly:outputter-dump-string outputter x))
nicolas
_______________________________________________
lilypond-devel mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to