X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fframework-texstr.scm;h=5078b35b9d53dc7845675a9487769bd97817c806;hb=08b2a48bdd102e2e53b4eafaf8bdc4726e4f1119;hp=7fd5294b4987ba7a8da3f85dca178a21d2c32e75;hpb=6eced6a93bbfda6e6af37a7d77a8e75a5052dbee;p=lilypond.git diff --git a/scm/framework-texstr.scm b/scm/framework-texstr.scm index 7fd5294b49..5078b35b9d 100644 --- a/scm/framework-texstr.scm +++ b/scm/framework-texstr.scm @@ -2,13 +2,14 @@ ;;;; ;;;; source file of the GNU LilyPond music typesetter ;;;; -;;;; (c) 2004--2005 Han-Wen Nienhuys +;;;; (c) 2004--2006 Han-Wen Nienhuys (define-module (scm framework-texstr) #:export (output-framework-tex output-classic-framework-tex)) (use-modules (ice-9 regex) + (scm paper-system) (ice-9 string-fun) (ice-9 format) (guile) @@ -40,7 +41,7 @@ (ly:outputter-dump-string outputter (header basename)) (for-each (lambda (system) - (ly:outputter-dump-stencil outputter (ly:paper-system-stencil system))) + (ly:outputter-dump-stencil outputter (paper-system-stencil system))) lines) (ly:outputter-dump-string outputter (footer))))