*** empty log message ***

[lilypond.git] / scm / page-layout.scm

diff --git a/scm/page-layout.scm b/scm/page-layout.scm
index ccfc71329a028ab96d11fbf885865504ee7c0eb6..ac4283c7a1a3e2d5273b7853b454e817751402a7 100644 (file)
--- a/scm/page-layout.scm
+++ b/scm/page-layout.scm
@@ -209,7 +209,7 @@ is what have collected so far, and has ascending page numbers."
                     lines)
                    (if (= (length lines) 1)
                        '((0 .  0))
-                       '())) ))
+                       '()))))
         (real-extents
          (list->vector
           (append
@@ -217,7 +217,7 @@ is what have collected so far, and has ascending page numbers."
             (lambda (sys) (ly:paper-system-extent sys Y)) lines)
            (if (= (length lines) 1)
                '((0 .  0))
-               '()) )))
+               '()))))
         (no-systems (vector-length real-extents))
         (topskip (interval-end (vector-ref real-extents 0)))
         (space-left (- page-height