* lily/paper-book.cc (output): call output-preview-framework

[lilypond.git] / scm / framework-tex.scm

diff --git a/scm/framework-tex.scm b/scm/framework-tex.scm
index e268f4173ace521e6143b09b614f309ff7ee5044..f032dec4821dfbed401fb2f8913de8bee10227a2 100644 (file)
--- a/scm/framework-tex.scm
+++ b/scm/framework-tex.scm
@@ -149,7 +149,7 @@
        "}\\vss\n}\n\\vfill\n"
        "}\\vss\n}\n\\vfill\\lilypondpagebreak\n")))
 
-(define-public (output-framework outputter book scopes fields basename)
+(define-public (output-framework outputter book scopes fields basename options)
   (let* ((bookpaper (ly:paper-book-book-paper book))
         (pages (ly:paper-book-pages book))
         (last-page (car (last-pair pages)))
@@ -203,7 +203,7 @@
 
 
 (define-public (output-preview-framework
-               outputter book scopes fields basename)
+               outputter book scopes fields basename options)
   (let* ((bookpaper (ly:paper-book-book-paper book))
         (lines (ly:paper-book-lines book)))
     (for-each