new file, move from

[lilypond.git] / scm / output-lib.scm

diff --git a/scm/output-lib.scm b/scm/output-lib.scm
index 943cf4c39092a342fefaa1aab8c2867f96c5f97e..eba247bc61ef5673cbaf5e3494395a59d284de92 100644 (file)
--- a/scm/output-lib.scm
+++ b/scm/output-lib.scm
@@ -42,7 +42,7 @@
           (paper (ly:grob-paper grob))
           (text (interpret-markup
                  paper
-                 (ly:grob-alist-chain grob (ly:paper-lookup paper 'text-font-defaults))
+                 (ly:grob-alist-chain grob (ly:output-def-lookup paper 'text-font-defaults))
                  letter)))
     
       (let ((x (/ (- (cdr (ly:stencil-extent slur 0))