* scm/define-markup-commands.scm (verbatim-file): new markup

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

diff --git a/scm/layout-page-layout.scm b/scm/layout-page-layout.scm
index 69e7c747d959b8ab30af2dae1eae4226be0bd8c0..7137f47de69e33487a543ee16380ad3e543398c8 100644 (file)
--- a/scm/layout-page-layout.scm
+++ b/scm/layout-page-layout.scm
@@ -101,6 +101,7 @@
        (dump-tweaks out-port (reverse val) (ly:make-moment 0 1))
         (display "}" out-port))
        tweaks)
+     (close-port out-port)
      ))
 
   (define (handle-page page)