]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/framework-texstr.scm
*** empty log message ***
[lilypond.git] / scm / framework-texstr.scm
index 17d4e5a8ff98cbc429b43b1b263dffec9631aa83..df677004e8b8662babbeaa8a98f48209f0e286d3 100644 (file)
 \\end{document}
 ")
 
-
 (define-public (output-classic-framework basename book scopes fields)
   (let* ((filename (format "~a.texstr" basename))
-        (outputter  (ly:make-paper-outputter filename
-                                             (ly:output-backend)))
+        (outputter (ly:make-paper-outputter filename (ly:output-backend)))
         (paper (ly:paper-book-paper book))
-        (lines (ly:paper-book-systems book))
-        )
+        (lines (ly:paper-book-systems book)))
     (ly:outputter-dump-string outputter (header basename))
     (for-each
      (lambda (system)
 
 (define-public (output-framework basename book scopes fields )
   (let* ((filename (format "~a.texstr" basename))
-        (outputter  (ly:make-paper-outputter filename
-                                             (ly:output-backend)))
+        (outputter (ly:make-paper-outputter filename (ly:output-backend)))
         (paper (ly:paper-book-paper book))
-        (pages (ly:paper-book-pages book))
-        )
+        (pages (ly:paper-book-pages book)))
     (ly:outputter-dump-string outputter (header basename))
     (for-each
      (lambda (page)